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SEQ 0003 

ee 1.0 GENERAL PROGRAM INFORMATION 

86 

87 1.1 PROGRAM PURPOSE 

Be eee FR a Niles aaa 

90 “CQKDA'’ 1S A DIAGNOSTIC PROGRAM DESIGNED TO DETECT, REPORT, 

91 AND IDENTIFY LOGIC FAULTS IN THE KDi1-K CENTRAL PROCESSING UNIT 
92 OF THE PDP11/6X SYSTEM. IT CONSISTS OF 504(10) INDIVIDUAL TESTS 
93 CAREFULLY DESIGNED AND SEQUENCED TO DETECT AND ATTEMPT TO 

94 IDENTIFY LOGIC FAULTS AT A MINIMUM HARDWARE/SOFTWARE LEVEL. 

95 THESE TESTS ARE PARTITIONED INTO FOUR MAJOR SECTIONS AS 

1 DESCRIBED BELOW: 

4 A. BASIC CPU TESTS (BCPT) 
100 
101 THIS IS THE BASIC CPU TEST TO VERIFY THE ‘‘HARDCORE’’. ANY FAULT 
102 DETECTED IN THIS SECTION CAUSES THE PROGRAM TO HALT WITH THE 
= PC+2 OF THE HALT INSTRUCTION DISPLAYED ON THE CONSOLE. 

4 
105 B. BASIC INSTRUCTION TESTS (BIT) 
ae een aE Oem ee 
108 THIS SECTION CONSISTS OF A LOGICALLY SEQUENCED SET OF BASIC 


INSTRUCTION TESTS DESIGNED TO VERIFY THE INTEGRITY OF THOSE 
INSTRUCTIONS AND LOGIC OPERATIONS USED BY THE UTILITY ROUTINES 
THAT PROVIDE ERROR LOGGING AND SCOPE LOOPING FACILITIES FOR THE 
SUBSEQUENT TWO MAJOR SECTIONS. NO UTILITY IS CALLED UNTIL ITS 
INSTRUCTION COMPLEMENT HAS BEEN VERIFIED. THIS SCHEME ACCOMP- 
LISHES TWO IMPORTANT MAINTENANCE OBJECTIVES: 1)1T MINIMIZES 
THE POSSIBILITY OF THE ERROR REPORTING ROUTINES CONVEYING 
AMBIGUOUS ERROR INFORMATION TO THE USER, AND 2)1T MAXIMIZES 
THE POSSIBILITY THAT THE ERROR WILL BE DETECTED BY A ROUTINE 
DESIGNED TO IDENTIFY FAILING OPERATIONS RATHER THAN HAVE THE 
ERROR MANIFEST ITSELF IN A MORE COMPLEX UTILITY ROUTINE 

THAT IS NOT STRUCTURED TC DIAGNOSE FAULTS. 


ANY FAULT DETECTED IN THIS SECTION CAUSES THE PROGRAM 10 

HALT WITH THE CONSOLE ADDRESS INDICATING THE PC+2 OF THE HALT 
INSTRUCTION IN THE FAILING TEST. ADDITIONAL FAULT IDENTIFICATION 
INFORMATION IS AVAILABLE IN THE PROCESSOR'S GENERAL REGISTERS, 
PSwW, STACK, AND PROGRAM ANNOTATION FOR THE FAILING TEST. A LOCK 
ON HARD ERROR FEATURE 1S EMPLOYED TO PREVENT THE PROGRAM FROM 
CONTINUING ON ONCE A SOLID ERROR IS DETECTED. DEPRESSING CONTINUE 
AFTER THE ERROR HALT CAUSES A RETRY OF THE FAILING TEST. 


C. COMPREHENSIVE INSTRUCTION TESTS (CIT) 


THIS SECTION, COMPRISED OF THE BULK OF THE TESTS, CONSISTS 

OF A LOGICALLY SEQUENCED AND PARTITIONED SET OF INSTRUCTION 
TESTS DESIGNED TO TEST AND VERIFY ALL THE BASIC INSTRUCTIONS 
OF THE KD11-K PROCESSOR. THIS EXCLUDES TESTING THOSE LOGIC 
FUNCTIONS THAT SUPPORT THE CONSOLE FUNCTIONS (LOAD ADDRESS, 
DEPOSIT, ETC.). EACH TEST IN THIS SECTION CALLS A ‘’SCOPE LOOP" 


ee ee ee ee ee ee ee ee ee ee ee se ee re ee re lL lr lL Ll 
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UTILITY THAT FACILITATES USER CONTROL OF TEST SELECTION AND 
EXECUTION VIA THE CONSOLE SWITCH REGISTER. 


UPON DETECTION OF A LOGIC FAULT, EACH TEST IN THIS SECTION 
CALLS AN ‘ERROR SERVICE’ ROUTINE THAT LOGS THE ERROR AND REP- 
ORTS IT AS HARD COPY ON THE CONSOLE TERMINAL DEVICE. THE ERROR 
SERVICE ROUTINE ALSO FACILITATES USER CONTROL OF THE PROGRAM 
SEQUENCE VIA CONSOLE SWITCH REGISTER OPTIONS. AFTER REPORTING 
THE ERROR THE PROGRAM CONTINUES ON IN ITS NORMAL SEQUENCE UN- 
LESS MODIFIED BY THE USER ACTIVATING THE "LOCK ON HARD ERROR" 
SWITCH OPTION. 


D. COMBINED INSTRUCTION EXERCISER (IEX) 


SSeS SSG Se SSeS Seen nee aenaanananaecoe= 


THIS SECTION CONSISTS OF A MORE COMPLEX SET OF INSTRUCTION 
TESTS DESIGNED TO TEST THE INSTRUCTIONS WHEN USED IN VARIOUS 
COMBINATIONS MANIPULATING VARIABLE DATA PATTERNS. IT ALSO 
TESTS THE MED AND ERROR LOGGING FEATURES OF THE CPU. LIKE THE 
PREVIOUS SECTION, IT CALLS THE ‘‘ERROR SERVICE*’ AND ‘’SCOPE LOOP"’ 
4 0 Ne TO REPORT ERRORS AND ALLOW USER CONTROL OF TEST EXEC- 
UTION. 


SYSTEM REQUIREMENTS 


A. HARDWARE REQUIREMENTS 

1. PDP11/6xX CPU WITH OPERATOR'S CONSOLE 

2. 16K OF CORE STORAGE - MF11/U OR EQUIVALENT 

3. DL11-W ASYNCHRONOUS LINE INTERFACE WITH LINE CLOCK 
B. SOFTWARE REQUIREMENTS 


1. PDP11 ABSOLUTE LOADER PROGRAM FOR PAPER TAPE SYSTEMS 


2. XXDP MONITOR FOR DECTAPE ,MAGTAPE CASSETTE, OR DISK SYSTEMS. 


RELATED DOCUMENTS AND STANDARDS 


“CQKDA'’ USES THE STANDARD APT SOFTWARE INTERFACES FOUND IN 
THE MACY11 SYSMAC PACKAGES. 


DIAGNOSTIC HIERARCHY REQUIREMENTS 


“"CQKDA'' WILL NORMALLY BE THE FIRST DIAGNOSTIC TO BE RUN AS 
PART OF PDP 11/6x CPU CHECKOUT. 


FAILURE ASSUMPTIONS 


“CQKDA’’ ASSUMES THAT THE STORAGE MEDIUM USED TO STORE THE 
PROGRAM IS INTACT AND THAT IT CAN BE LOADED INTO CORE. 


OPERATING INSTRUCTIONS 


F 
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2.1 


2.2 


A. LOADING PROCEDURES 
1) STANDARD PDP11 ABSOLUTE LOADER PROCEDURES FOR PAPER TAPE. 
2) STANDARD XXDP MONITOR LOADING PROCEDURES. 
3) STANDARD APT OR ACT LOADING 

B. MANUAL STARTING PROCEDURES 


1) LOAD SWITCH REG WITH 000000 (NO SWITCH OPTIONS) 
2) SET DISPLAY TO 000200 

3) DEPRESS LOAD ADDRESS 

4) PRESS CNTRL AND START BUTTONS SIMULTANEOUSLY 


SPECIAL ENVIRONMENTS 


16K PDP11/6X SERIES SYSTEMS 


FOR 16K SYSTEMS USING THE ‘'XXDP’' PACKAGE YOU WILL BE UNABLE 
TO USE THE ‘‘UPDATE’’ PROGRAMS TO LOAD,SAVE, UPDATE ETC. 
SINCE THE SIZE OF ““CQKDA'’ WILL NOT PERMIT SIMULTANEOUS 
RESIDENCY OF THE UPDATE PROGRAMS. SUFFICIENT FREE CORE IS 
AVAILABLE FOR THE ‘‘XXDP'' MONITOR SO THAT ‘‘CQKDA"’ CAN BE 
LOADED BY THE MONITOR. 


PROGRAM OPTIONS 


A. SWITCH REGISTER OPTIONS 


THE FOLLOWING CONSOLE SWITCH REGISTER OPTIONS ARE ACTIVE 
UPON ENTERING THE COMPREHENSIVE INSTRUCTION TESTS (CIT) 
SECTION: (SWITCH OPTION 1S ACTIVE WHEN SW IS SET TO A °'I"’) 


Sw15 HALT ON ERROR. IF ERROR PRINTING IS ENABLED THE HALT 
OCCURS AFTER THE PRINTOUT. DEPRESSING ‘‘CONTINUE’’ CAUSES 
THE PROGRAM TO PROCEED ON IN NORMAL SEQUENCE FROM THE 
POINT OF ERROR. 


Swi4 CONTINUOUSLY LOOP ON THE CURRENT TEST 


Sw13 INHIBIT NORMAL ERROR PRINTOUTS = THIS DOES NOT INCLUDE 
POWER FAIL, BUS ERROR, OR RSVD INSTR TRAPS. 


Swi2 INHIBIT ALL PRINTOUTS NOT COVERED UNDER SW15. Th!S 
INCLUDES 1.0., BUS ERROR, AND RSVD INSTR TRAPS. 
NOTE THAT IT IS NOT POSSIBLE TO INHIBIT END PASS OR 
POWER FAIL PRINTOUTS. 


SEQ 0005 
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Swi INHIBIT SUB-TEST ITERATIONS. TEST ITERATIONS ARE 
AUTOMATICALLY INHIBITED ON THE FIRST PASS. 


Swi0 SEARCH FOR AND CONTINUOUSLY LOOP ON THE TEST NUMBER 
SELECTED BY THE CONTENTS OF SW<08:00>. ONLY USE THIS 
CPTION FOR TESTS TST176 THRU TST767 SINCE THE ‘'SCOPE"’ 
UTILITY 1S NOT ACTIVE UNTIL TEST TST176. LOOPING ON 
TST176 WILL CAUSE A LOOP ON THE ENTIRE ‘'BIT’’ SECTION 
(TESTS 0-176). 


$w09 LOCK ON HARD ERROR 


SW<8:0> USED TO SELECT A PARTICULAR TEST FOR LOOPING IF SW10=1. 
TEST NUMBER MUST BE BETWEEN 176 AND 767. 


B. MEMORY LOCATIONS 


4. BPTLOC: THERE IS A LOCATION TAGGED ‘‘BPTLOC’’ 1HAT PROVIDES THE 
USER THE MECHANISM FOR SETTING SIXTEEN ‘‘BREAKPOINT 
HALTS'’ THROUGHOUT THE PROGRAM. THIS ENABLES RAPIDLY 
“HOMING IN’ ON THE FAILING TEST IN THOSE CASES WHERE 
THE FAULT CAUSES A RUNAWAY OR HUNG PROGRAM. REFER TO 
PARA. 4.2 FOR A DETAILED DESCRIPTION OF THE USE OF 
THIS FEATURE. 


EXECUTION TIMES 


ONE COMPLETE ERROR FREE PASS OF ‘‘CQKDA’’ WITH NO TEST ITERATIONS 
SHOULD TAKE LESS THAN 7 SECONDS. A SUCCESSFUL PASS WILL BE IN- 
DICATED BY THE FOLLOWING PRINTOUT ON THE CONSOLE DEVICE: 

END PASS # 000001 ERROR COUNT = 000000 
THIS ERROR COUNT IS NOT CLEARED AT THE BEGINNING OF A NEW PASS. 
WITH ITERATIONS ENABLED A COMPLETE ERROR FREE PASS SHOULD TAKE 
LESS THAN 2.5 MINUTES. 


ERROR INFORMATION 


A. ERROR MESSAGE FORMATS 
THERE ARE SEVERAL DIFFERENT ERROR FORMATS. EACH IS DESCRIBED BELOW. 
1.) ERROR 1 1S OF THE FORM 


WAS DST DEST (IR) TEST (PC) (SP) (PSW) 
1000008 000000) 000000 O0O00G 00000 OO00CT OOOO! 


WHERE: 
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$/B DST 
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$/B DST FOR SINGLE AND DOUBLE OPERAND INSTRUCTIONS THIS 
COLUMN CONTAINS WHAT THE RESULT (DEST. OPERAND) 
SHOULD HAVE BEEN (S/B). 


WAS DST FOR SINGLE AND DOUBLE OPERAND INSTRUCTIONS THIS 
COLUMN CONTAINS WHAT THE RESULT (DEST. OPERAND) 
ACTUALLY WAS AFTER THE TEST. 


DEST FOR SINGLE AND DOUBLE OPERAND INSTRUCTIONS THIS 
COLUMN CONTAINS THE DESTINATION ADDRESS. 


(IR) THIS IS A COPY OF THE TEST INSTRUCTION. 
THIS WILL BE THE FIRST WORD IN THE CASE OF TWO 
OR THREE WORD INSTRUCTIONS. 


TEST INDICATES THE TEST NO. (IN OCTAL) THAT FAILED 


(PC) INDICATES THE CONTENTS OF THE PROGRAM COUNTER AT THE 
TIME OF THE ERROR CALL. THIS IS AN ADDRESS NORMALLY 
USED TO LOCATE THE ERROR CALL STATEMENT IN 
THE FAILING TEST. 


(SP) INDICATES THE CONTENTS OF THE STACK POINTER (R6) AT 
THE TIME OF THE ERROR. NOTE THAT THE ERROR CALL 
WILL PUSH THE STACK TWICE. IN SP TESTS WHERE THE 
SP MUST BE RESTORED PRIOR TO CALLING THE ERROR ROUTINE, 
THEN THE ORIGINAL (UNRESTORED) SP 1S TYPED, WITHOUT 
ADDITIONAL PUSHES FROM THE ERROR CALL. 


(PSW) INDICATES THE CONTENTS OF THE PROCESSOR STATUS WORD 
AT THE TIME OF THE ERROR CALL 


XXXXKXK 1S AN OCTAL NUMBER. 
2.) ERROR 2 AND ERROK 4 ARE THE SAME AS FOR ERROR 1 ABOVE 
EXCEPT THAT IN THIS CASE THE DESTINATION IS A GENERAL 
REGISTER (WHICH DOES NOT HAVE A UNIBUS ADDRESS). THE OCTAL 
NUMBER TYPED OUT IN THE ‘‘DEST'’ COLUMN SHOULD BE IGNORED. 
THE TYPOUT WOULD LOOK AS FOLLOWS: 
WAS DST 77 CIR) TEST (PC) (SP) (PSw) 

IS 
100000) 0000008 000000 000000 O0000C OO000C OOOO 
3.) ERROR 5, ERROR 6, AND ERROR 7 ARE IDENTICAL TO ERROR 1 
EXCEPT THAT ONLY THE LAST 5,6, OR 7 COLUMNS (RESPECTIVELY) 
ARE PRINTED. 
4.) ERROR 3 1S USED IN CASES WHERE THE STACK POINTER IS 
SPECIFICALLY IN ERROR. THE COLUMNS HAVE THE SAME MEANING AS 
DESCRIBED FOR ERROR 1 EXCEPT: 
S/B SP IS WHAT THE STACK POINTER SHOULD HAVE BEEN (S/B) 


WAS SP 1S WHAT THE STACK POINTER ACTUALLY WAS 


SEQ 0007 
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5.) OTHER ERRORS TYPE OUT THEIR SPECIFIC ERROR MESSAGE, FOLLOWED 
BY SELF EXPLANATORY DATA HEADERS, DEPENDING ON THE ERROR. 
AN EXAMPLE FOLLOWS: 


ot “yams READ BY A MED 


XXKKKK 


TESTS SK 
PC 
XXKKKX 


MEDCODE EXPECTD RECEIVD 
KKKKKK MAK AK 


6.) WHEN THE SCOPE ROUTINE BECOMES ACTIVE, IT CHECKS THAT 
THE TEST NUMBER (IN RO) IS EXACTLY ONE GREATER THAN THE 
TEST NUMBER ON THE PREVIOUS SCOPE CALL. IF A MACHINE 
ERROR CAUSES TESTS TO BE SKIPPED, OR THE PROGRAM TO JUMP 
BACKWARDS, ERROR 11 WILL REPORT THIS AS FOLLOWS: 


IPPED 
EXPCTD ACTUAL (TEST #'S) 
XXXKKKX  XXXKKX 


EXPCTD THIS IS THE TEST NUMBER THE SCOPE WAS EXPECTING TO BE 
CALLED FROM. 


ACTUAL THIS IS THE TEST NUMBER THAT IT FOUND IN RO 
7.) RESERVED INSTRUCTION TRAP ERROR MESSAGE 


ANY RESERVED INSTRUCTION TRAP DETECTED AFTER THE 
BASIC TESTS RESULTS IN THE FOLLOWING PRINTOUT: 


TRAPPED TO 10 PC = XXXXXX 


WHERE: XXXXXX 1S THE VALUE OF THE PROGRAM COUNTER 
PUSHED ON THE STACK WHEN THE TRAP WAS SPRUNG. 


AFTER REPORTING THE ERROR, THE PROGRAM IS RESTARTED 
FROM THE BEGINNING. 


IF A RSVD INSTRUCTION TRAP OCCURS WHILE IN THE PROCESS 
OF TRYING TO SERVICE A PREVIOUS RSVD INSTRUCTION TRAP 
OR A BUS ERROR TRAP THE PROGRAM HALTS. A DESCRIPTION 
OF THIS HALT IS CONTAINED IN PARA. 3.2.3 BELOW. 


IF A RSVD INSTRUCTION TRAP OCCURS PRIOR TO COMPLETION 
OF THE BASIC INSTRUCTION TEST SECTION THE PROGRAM WILL 
HALT VIA A TRAPCATCHER IN THE VECTOR. A DESCRIPTION OF 
THIS HALT 1S DESCRIBED IN PARA. 3.2.2 BELOW. 


4. BUS ERROR TRAP ERROR MESSAGE 


ANY UNEXPECTED BUS ERROR TRAPS (BUS TIMEOUT, ODD 
ADDRESS ERROR, ILLEGAL INSTRUCTION, OR STACK OVERFLOW) 
RESULTS IN THE FOLLOWING PRINTOUT: 


TRAPPED TO 4 PC = XXXKXKX 


SEQ 0008 


| 
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422 THE STACK WHEN THE TRAP WAS SPRUNG. 


424 AFTER REPORTING THE ERROR THE PROGRAM IS RESTARTED 
425 FROM THE BEGINNING. 


427 IF A BUS ERROR TRAP OCCURS WHILE A PREVIOUS BUS ERROR 


428 OR RSVD INSTRUCTION IS STILL PENDING THE PROGRAM WILL 
429 HALT. A DESCRIPTION OF THE HALT INTERPRETATION IS GIVEN 
ce IN PARA. 3.2.3 BELOW. 

43< IF A BUS ERROR OCCURS PRIOR TO THE COMPLETION OF THE 
433 BASIC INSTRUCTION TESTS, THE PROGRAM WILL HALT VIA A 
434 TRAPCATCHER IN THE VECTOR. A DESCRIPTION OF THIS HALT 
oi 1S INCLUDED IN PARA. 3.2.2 BELOW. 

437 5. POWER FAIL 

Cy OS FT ae SST or ak, | eretenieen 

439 

440 IF A POWER FAIL CONDITION IS DETECTED, THE FOLLOWING 

441 MESSAGE IS PRINTED: 

442 

443 POWER 

444 

445 AFTER PRINTING AN ATTEMPT IS MADE TO RESTART THE PROGRAM AT 
446 THE BEGINNING. 

447 

448 3.2 ERROR HALTS 

eo ee eee ee ek a ee ee 

450 

451 1. BASIC INSTRUCTION TESTS (BIT) 

452 — epemmmmommooowoooooosoococococe 

453 

454 ANY ERROR DETECTED IN THE BASIC TESTS CAUSES THE 

455 PROGRAM TO HALT WITH THE PC+2 OF THE LOCATION CONTAINING 
‘* THE HALT INSTRUCTION DISPLAYED. 

4 

458 EXAMINING THE CONTENTS OF THE CPU'S GENERAL REGISTERS, 
459 THE PSW, AND THE STACK WILL PROVIDE ADDITIONAL FAULT 
460 IDENTIFICATION INFORMATION. 

461 

462 DEPRESSING ‘CONTINUE'’ AFTER THE HALT WILL CAUSE AN 

463 AUTOMATIC RETRY OF THE FAILING TEST. IF THE ERROR IS 
464 SOLID THE PROGRAM WILL LOSK ON THIS TEST, BUT IF IT 

465 1S INTERMITTENT THE PROGRAM WILL CONTINUE ON IN NORMAL 
466 SEQUENCE ONCE THE TEST IS SUCCESSFULLY EXECUTED. 

467 

468 TO ESTABLISH A TIGHT SCOPE LOOP ON THE FAILING TEST, 
469 REPLACE THE "‘HALT'' WITH A 400(8). AND DEPRESS "CONTINUE" 
470 THE ''400°° 1S A ‘’BR .+#2°' WHICH FUNCTIONS AS A NOP. THIS 
471 1S NECESSARY TO PRESERVE THE INTEGRITY OF THE CONDITION 
472 CODE OPERATE INSTRUCTION THAT IS USED AS A SCOPE SYNC. THIS 
473 BUILT IN SYNC FEATURE IS DESCRIBED IN PARA, 5.0. 

474 


2. TRAPCATCHER HALTS 
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THE VECTOR AREA (LOC 000 = 776) 1S PROGRAM LOADED WITH 
A STANDARD TRAPCATCHER AS SHOWN BELOW: 


v / vee 
v+2/ HALT 


AFTER THE BASIC INSTRUCTION TESTS THE FOLLOWING VECTORS 
ARE SET UP TO POINT TO APPROPRIATE SERVICE ROUTINES: 


4/6 BUS ERROR SERVICE 

10/12 RSVD INSTRUCTION TRAP SERVICE 
20/22 SCOPE LOOP SERVICE 

24/26 POWER FAIL SERVICE 

30/32 ERROR SERVICE 

34/36 PRINT SERVICE 


AT THE APPROPRIATE POINTS IN THE COMPREHENSIVE INSTR- 
UCTION TESTS THE LINE CLOCK VECTOR (100/102) AND THE DL11 
VECTORS (60/62 - 64/66) ARE SET UP TO CHECK INTERRUPTS 
FROM THESE DEVICES. ALL OTHER VECTORS REMAIN SET UP TO 
CATCH’ UNEXPECTED TRAPS OR INTERRUPTS BY HALTING. 


WHEN AN UNEXPECTED TRAP OR INTERRUPT NOT SUPPORTED BY 
AN APPROPRIATE SERVICE ROUTINE OCCURS THE CPU HALTS. 

WITH THE PC+4 OF THE VECTOR DISPLAYED IN THE CONSOLE. 
THIS 1S USED TO IDENTIFY THE CAUSE OF THE UNEXPECTED 

TRAP OR INTERRUPT. 


THE LAST ENTRY PUSHED ON THE STACK CAN BE EXAMINED 
TO DETERMINE WHERE THE PROGRAM WAS WHEN THE TRAP OR 
INTERRUPT WAS SPRUNG. REMEMBER THAT THE ‘‘OLD PC"’ GETS 
SAVED ON THE STACK WHEN A TRAP OR INTERRUPT OCCURS. 


TASTROPHIC ERROR HALTS 


THERE ARE TWO HALTS, ONE IN THE BUS ERROR SERVICE ROU- 
TINE AND THE OTHER IN THE RSVD INSTRUCTION TRAP SERVICE 
ROUTINE THAT HALT THE PROGRAM IF ONE OF THESE ERRORS 
OCCURS WHILE STILL SERVICING A PREVIOUS BUS ERROR 

OR RSVD INSTRUCTION TRAP. AFTER THE HALT THE CONSOLE 
DISPLAYS THE PC+2 OF THE ERROR HALT. THIS IS USED 

TO IDENTIFY WHICH OF THE TWO TYPES OF ERRORS = RSvD 

OR BUS ERROR - OCCURRED LAST. 


THERE IS A SOFTWARE FLAG TAGGED ‘’CATERR'' THAT MAY BE 
EXAMINED TO OBTAIN THE FOLLOWING INFORMATION: 


CCATERR] = 000002 TWO SUCCESSIVE BUS ERRORS 

CCATERR] = 001000 TWO SUCCESSIVE RSVD INSTR. TRAPS 

CCATERR] = 000401 A COMBINATION OF THE TWO. THE 
CONTENTS OF THE ADDRESS DISPLAY 
IDENTIFIES WHICH TYPE OCCURRED LAST. 


THE STACK PROVIDES THE FOLLOWING ADDITIONAL INFORMATION: 


SEQ 0010 
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532 
533 CSP J / PC OF THE 2ND TRAP 
534 {(SP+2] / PSw OF THE 2ND TRAP 
535 {SP+4) / PC OF THE 1ST TRAP 
fs CSP+6] / PSw OF THE 1ST TRAP 
fe 4.0 PERFORMANCE AND PROGRESS REPORTS 
540 
541 4.1 PERFORMANCE REPORTS 
pe arn Goal a 
544 THERE 1S ONLY ONE PERFORMANCE REPORT SUPPLIED BY THE PROGRAM 
545 AND CONSISTS OF A SIMPLE END OF PASS MESSAGE OF THE FORMAT 
re SHOWN BELOW: 
ae PASCNT = XXXXXX ERRCNT = YYYYYY 
550 WHERE: XXXXXX 1S THE TOTAL NUMBER OF COMPLETE PASSES 
44 OF THE ENTIRE PROGRAM (OCTAL) 
ge: YYYYYY IS THE TOTAL ERROR COUNT IN OCTAL 
4 
555 4.2 PROGRESS REPORTS 
RR Pepa 0 2S eoaee natant 
558 THERE ARE TWO PROGRESS REPORTS PRINTED THAT REPORT NORMAL 
44 ERROR FREE EXECUTION OF THE PROGRAM. 
6 
26! A. END OF PASS PRINTOUT AS DESCRIBED IN 4.1 ABOVE. 
ot B. PROGRAM IDENTIFICATION MESSAGE AS DESCRIBED BELOW: 
6 
44 CQKDA_ KO11-K BASIC LOGIC TESTS 
6 
507 THIS MESSAGE GETS PRINTED THE FIRST TIME THE PROGRAM ENTERS 
568 THE COMPREHENSIVE INSTRUCTION TEST SECTION UNLESS 
569 INHIBITED By Swi2=1. AFTER THE FIRST PASS THIS PRINTOUT 
th 1S AUTOMATICALLY INHIBITED UNLESS THE PROGRAM IS RESTARTED AT 200(8). 
$72 4.3 MAINTENANCE BREAKPOINT FEATURE 
oe eae Oe a 
575 THERE 1S A MANUAL PROGRESS REPORT FEATURE THAT ALLOWS THE USER 
576 TO STEP THROUGH THE PROGRAM, HALTING AFTER EVERY N'TH TEST WITH 
577 PROGRESS INFORMATION DISPLAYED IN THE CCNSOLE ADDRESS DISPLAYS. 
578 TO ACTIVATE THIS FEATURE THE USER MUST SET THE DESIRED 
579 “BREAKPOINT HALT'’ BITS IN THE MEMORY LOCATION TAGGED ‘’BPTLOC"’. 
580 THIS LOCATION PROVIDES SIXTEEN POSSIBLE HALTS DISPERSED EVENLY 
581 THROUGHOUT THE PROGRAM (APPROX. EVERY 20 TESTS). AT EACH CHECK- 
582 POINT THE PROGRAM EXAMINES A PARTICULAR BIT IN ‘‘BPTLOC'’ AND 
583 HALTS IF THE BIT IS SET TO A ‘1’ OTHERWISE IT CONTINUES IN 
584 NORMAL SEQUENCE. AFTER THE HALT DEPRESSING ‘‘CONTINUE'’ WILL CAUSE 
585 RESUMPTION OF NORMAL PROGRAM EXECUTION. SETTING LOCATION ‘‘BPTLOC" 
586 TO ALL 1°S (177777) WILL RESULT IN THE FOLLOWING SIXTEEN HALTS 


587 WITH THE INFORMATION SHOWN DISPLAYED IN THE CONSOLE: 
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CQKDAD.P11 


5.0 


5.1 


CBPTLOC) ween DISPLAY 
HALT PC4#2 


TP 


a ee a at oe 


NOTE: IF THE USER DEPOSITED A 000400(8) IN LOCATION ‘'BPTLOC”’ 
ONLY ONE HALT WOULD OCCUR AND AT THAT TIME THE 
DISPLAY SHOULD CONTAIN 27162. 


THIS FEATURE IS USEFUL FOR TRACKING DOWN THE TEST THAT CAUSES 
A "'RUNAWAY'’ OR ‘'HUNG'’ PROGRAM, 


LOCATION "’BPTLOC’’ 1S PROGRAM LOADED AS 000000 TO INHIBIT ANY HALTS. 


MAINTENANCE PROCEDURES 


THE PROCEDURES OUTLINED IN THIS SECTION ASSUME THAT ‘’CQKDA"’ 
CAN BE LOADED INTO CORE AND STARTED. IF THE FAILURE MODE 
PREVENTS PROGRAM LOADING OR AFFECTS NORMAL POWER UP AND 
CONSOLE OPERATIONS, THE TECHNICIAN MUST REVERT TO THE MANUAL 
DEBUG AND CHECKOUT PROCEDURES. 


THE KDi1-K CENTRAL PROCESSING UNIT CAN BE VIEWED AS 
CONSISTING OF TWO MAJOR LOGIC AREAS AS DEPICTED BELOW: 


DATA IN **##* 


ereterereerrerte (RR RRSRRASASASSS SB I 
* t ® ° 
* CONTROL #>>>>>>>>>>>>># DATA ® 
* SECTION BLEEK KKK KKK PATHS * 
* w ® a 





CQKDADO KD11-K BLT 


CQKDAD.P11 


11-SEP-79 


vt th 30A(1052) 
13:31 


5. 


6. 


3 


N 
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DOCUMENT LISTING 


2 


0 


TITLE 
s*COPYRIGHT (C) 1977,1979 
:*DIGITAL EQUIPMENT CORP. 
:*MAYNARD, MASS. 01754 


fererrrrrrrere ferererrererreeres 
? 


w 
##@>DATA OUT 


THE DATA PATHS CONSIST OF A LOGICALLY INTERCONNECTED GROUP 
OF STATIC DATA FACILITIES (REGISTERS, MULTIPLEXORS, ALU'S 
ETC.) REQUIRED TO TEMPORARILY STORE, MODIFY, AND TRANSFER 
DATA ITEMS (16 BIT WORDS OR 8 BIT BYTES) ACCORDING TO THE 
DESIGN SPECIFICATIONS FOR THE PDP11. 


THE CONTROL SECTION SUPPLIES PREDEFINED SEQUENCES OF CONTROL 
SIGNAL SETS TO ACTIVATE THE REQUIRED DATA FACILITIES WITHIN 
THE DATA PATHS. IN THE KD11-K THESE CONTROL SIGNAL SETS ARE 
STORED IN A READ ONLY MEMORY (ROM) AND GENERATED BY READING 
1M ua SEQUENCE OF ROM WORDS FOR EACH OPERATION TO BE 


THE SEQUENCE GENERATED BY THE CONTROL SECTION IS VARIABLE 
AND DEPENDENT UPON THE INSTRUCTION OR LOGIC OPERATION 
BEING EXECUTED. THERE ARE HUNDREDS OF THESE SEQUENCES POSS- 
IBLE DEPENDENT UPON OF THE PROGRAM CODING. 


“CQKDA' 1S DESIGNED TO GENERATE ALL POSSIBLE MICROINSTRUCTION 
SEQUENCES AND COMBINATIONS OF DATA AND CONTROL SIGNALS. THE 
INDIVIDUAL TESTS ARE LOGICALLY SEQUENCED AND STRUCTURED TO 
Fa te AND ISOLATE PARTICULAR MICROPROGRAM SEQUENCES THAT ARE 
FAULTY. 


CONDITION CODE SCOPE SYNC FEATURE 


FROM THE BIT SECTION TO THE MED TESTS iN THE CIT SECTION, ALL 
TEST INSTRUCTIONS ARE PRECEEDED BY A CONDITION CODE OPERATE 
INSTRUCTION. THE UBREAK REGISTER 1S PROGRAM LOADED TO GENERATE 
A SYNC PULSE NEAR THE END OF THIS INSTRUCTION. DURING THE MED 
TESTS, THE PULSE 1S GENERATED NEAR THE BEGINNING OF THE MED 
EXECUTION. THIS PULSE IS GENERATED ON BACKPLANE PIN BO5M2 AND 


MAY BE USED IN CONJUNTION WITH THE PROGRAM LOOPING FEATURES TO 


PROBE THE KD11-K DURING THE FAILING TEST. 


seenereeee ECO HISTORY tetereenee 
HISTORY STARTS WITH REV. 


DO 
COKDADO = HARDWARE ECO #M7877-002 REQUIRES THAT BIT 9 IN LOG JAM REG. BE 


TESTED FOR SET CONDITION. TEST 7635 MODIFIED. 
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“9 


SEQ 0013 


B 2 ETERS es 7g 
ESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 15 | 
1 ING SEQ 0014 


CQKDA-D KDI1-K BASIC LOGIC 1 
COKDAD.P11 11-SEP-79 13:3 DOCUMENT LIST 
700 . 
701 
702 THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
Ab caacae (MAINDEC-11-DZQAC-C3), JAN 19, 1977. 
a4 * SBITL OPERATIONAL SWITCH SETTINGS 
*@ ’ 
707 ;* SWITCH USE 
708 rr ee 
709 ;* 15 HALT ON ERROR 
710 if 14 LOOP ON TEST 
711 :t 13 INHIBIT ERROR TYPEOUTS 
712 7° 12 INHIBIT ID MESSAGE & UNEXPECTED TRAP MESSAGES 
713 it 11 INHIBIT ITERATIONS 
714 ;* 10 LOOP ON TEST IN SWR<8:0> 
715 ;t 9 LOOP ON ERROR 
716 -ENABLE ABS 
4h -SBTTL BASIC DEFINITIONS 
719 s*INITIAL ADDRESS OF THE STACK POINTER **#* 1000 *#* 
720 001000 STACK= 1000 
721 -EQUIV) EMT,ERROR 3;BASIC DEFINITION OF ERROR CALL 
SS -EQUIV I10T,SCOPE ;;BASIC DEFINITION OF SCOPE CALL 
724 > *MISCELLANEOUS DEFINITIONS 
725 000011 HT= 11 :CODE FOR HORIZONTAL TAB 
726 000012 LF= 12 CODE FOR LINE FEED 
727 000015 CR= 15 ;:CODE FOR CARRIAGE RETURN 
728 000200 CRLF = 200 3; CODE FOR CARRIAGE RETURN-LINE FEED 
729 177776 PS= 177776 3;PROCESSOR STATUS WORD 
730 -EQUIV PS,PSW 
731 177774 STKLMT= 177774 3; STACK LIMIT REGISTER 
732 177772 PIRQ= 177772 > :PROGRAM INTERRUPT REQUEST REGISTER 
733 177570 DSWR= 177570 > HARDWARE SWITCH REGISTER 
oe 177570 DDISP= 177570 ; ;HARDWARE DISPLAY REGISTER 
736 s*GENERAL PURPOSE REGISTER DEFINITIONS 
737 000000 RO= x0 7; GENERAL REGISTER 
758 000001 Ri= %1 3; GENERAL REGISTER 
739 000002 R2= %2 7; GENERAL REGISTER 
740 000003 R3= x3 7 ;GENERAL REGISTER 
741 000004 R4= %4 3; GENERAL REGISTER 
742 000005 R5= a5 7; GENERAL REGISTER 
743 000006 Ro= %6 7 ;GENERAL REGISTER 
744 000007 R7= x7 > :GENERAL REGISTER 
745 000006 SP= %6 3:STACK POINTER 
og 000007 PC= %7 :;PROGRAM COUNTER 
4 
748 s*PRIORITY LEVEL DEFINITIONS | 
749 000000 PRO= 0 s;PRIORITY LEVEL 0 
750 000040 PRI1= 40 : PRIORITY LEVEL 1 
751 000100 PR2= 100 s PRIORITY LEVEL 2 
752 000140 PR3= 140 > PRIORITY LEVEL 3 
753 000200 PR4= 200 - > PRIORITY LEVEL 4 
754 000240 PRS= 240 s;PRIORITY LEVEL 5 
755 000300 PRO= 300 ::PRIORITY LEVEL 6 


. 4 
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CQKDAD.P11 11-SEP-79 13:31 BASIC DEFINITIONS SEQ 0015 
| 000340 PR7= 340 ;;PRIORITY LEVEL 7 
758 s*'’SWITCH REGISTER’ SWITCH DEFINITIONS 
759 100000 Sw15= 100000 
760 040000 SW14= 40000 
761 020000 $wW13= 20000 
762 010000 SWi2= 10000 
763 004000 Swil= 4000 
764 002060 $Ww10= 2000 
765 001000 SwO9= 1000 
766 000400 SwO8= 400 
767 000200 SwO7= 200 
768 C00 100 SwO6= 100 
769 000040 SwOS= 40 
770 000020 Sw04= 20 
771 000010 SwO3= 10 
772 000004 SWO2= 4 
773 000002 SwOl= 2 
774 000001 SwOO= 1 
775 EQUIV SW09,SW9 
776 EQUIV SWO08,SW8 
777 EQUIV SWO7,SW7 
778 EQUIV SW06,SW6 
779 EQUIV SWwO5,SW5 
780 EQUIV SW04,SW4 
781 EQUIV SWO03,SW3 
782 EQUIV SWO02,Swe 
783 ~-EQUIV. SW01,SW1 
po -EQUIV Sw00,SWO 
786 :*DATA BIT DEFINITIONS (BITO0 TO B1T15) 
787 100000 BIT15= 100000 
788 040000 B1T14= 40000 
789 020000 B1T13= 20000 
790 010000 BIT12= 10000 
791 004000 BIT11= 4000 
792 902000 B1T10= 2000 
793 001000 B1T09= 1000 
794 000400 B1T08= 400 
795 000200 B1T07= 200 
796 000100 B1T06= 100 
797 000040 BIT05= 40 
798 000020 BIT04= 20 
799 000010 B1T03= 10 
800 000004 BIT02= 4 
801 000002 BITOI= 2 
802 000001 BITOO0= 1 
803 -EQUIV B1109,B119 
804 EQUIV B1108,B118 
805 -EQUIV B1T07,B117 
806 -EQUIV B1106,B116 
807 -EQUIV B1105,B115 
808 EQUIV B1T04,B1T4 
809 -EQUIV B1103,BI1T3 
810 -EQUIV B1102,BI1T2 
811 -EQUIV) B1101,B1T1 
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812 

815 

814 

815 000004 
816 000010 
817 000014 
818 000014 
819 000014 
820 000020 
8. 000024 
822 000030 
823 000034 
824 000060 
825 000064 
826 000240 
827 

828 

829 000000 
830 

831 

832 

835 000174 
834 000174 000000 
tH 000176 000000 
837 000200 000137 
838 000700 
839 

840 

841 

842 

843 

844 000700 
845 000024 
846 000024 000200 
847 000044 
848 000044 000700 
849 000700 
850 

851 

852 

853 

854 000700 

855 000700 000000 
856 000702 001120 
857 000704 000000 
858 000706 000000 
859 000710 000000 
860 000712 000014 
861 

862 

863 

864 

865 000714 
866 000046 
867 000046 060644 


G 


001630 


dD 2 
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BASIC DEFINITIONS SEQ 0016 


-EQUIV B1100,B1T0 


; *BASIC ‘saad TRAP VECTOR | rt 
ERRVEC= TIME OUT AND OTHER ERRORS 


RESVEC= to | RESERVED AND ILLEGAL INSTRUCTIONS 
TBITVEC=14 IT 

TRIVEC= 14 >: TRACE TRAP 

BPTVEC= 14 > ;BREAKPOINT TRAP (BPT) 

1OTVEC= 20 3; INPUT/OUTPUT TRAP (JOT) **SCOPE** 
PWRVEC= 24 > POWER FAIL 

EMTVEC= 30 ; EMULATOR TRAP (EMT) **ERROR** 
TRAPVEC=34 :3''TRAP'' TRAP 

TKVEC= 60 si; TTY KEYBOARD VECTOR 

TPVEC= 64 3; TTY PRINTER VECTOR 

PIRQVEC=240 3;PROGRAM INTERRUPT REQUEST VECTOR 


-SBTTL TRAP CATCHER 


> *ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A ‘'.#2,HALT"’ 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
i*LOCATION 0, CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: .WORD 0 +;SOFTWARE DISPLAY REGISTER 
SWREG: -WORD 0 7;SOFTWARE SWITCH REGISTER 
.SBTTL STARTING ADDRESS(ES) 
JMP Q#START ;; JUMP 10 STARTING ADDRESS OF PROGRAM 
=700 ;PUT APT HEADER IN STACK AREA 
“SBTTL APT PARAMETER BLOCK 


sp etereererereeerereerereeeererenereetereeeereeaeeteneneneneneeeese 
[SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
sy eteteeeeererereeerrererrersetetrerrenreeeeaKeeeeRreneeeeKeeereeeese 

.$X=. 5; SAVE CURRENT LOCATION 

.=24 3 ;SET POWER FAIL TO POINT TO START OF PROGRAM 

200 :3FOR APT START UP 

=44 :POINT TO APT INDIRECT ADDRESS PNTR. 

SAPTHOR POINT TO APT HEADER BLOCK 

.$X 5 ;RESET LOCATION COUNTER 

Lp eeeeeeeteetereerereererreettetereertrteeterenenererteetereneets 
:SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
S INTERFACE SPEC. 


SAPTHD: 

$HIBTS: .WORD 0 :;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

SMBADR: .WORD $MAIL : ADDRESS OF APT MAILBOX (BITS 0-15) 

$TSTM: .WORD 3;RUN TIM OF LONGEST TEST 

SPASTM: .WORD + =RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
SUNITM: . WORD sADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 


“WORD © SETEND-SMAIL/2 ;;LENGTH MAILBOX~E TABLE (WORDS) 
.SBTTL ACT11 HOOKS 


**@m@eekereteeteeeeeeeeee eee eter eee eteeneeeeeneese 


“HOOKS REQUIRED BY ACT11 
$SVPC= SAVE PC 
2h 


$ENDAD 7: 1)SET L0C.46 TO ADDRESS OF SENDAD IN .SEOP 
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868 000052 
869 000052 000000 
870 000714 


TE 
31 


STS 


e ¢ 
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ACT11 HOOKS 


-=52 
. WORD 
-=$SVPC 


0 


332)SET LOC.52 10 ZERO 
3; RESTORE PC 


SEQ 0017 
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001000 


001000 
001062 


LO 
11-SEP-79 


001000 
000000 


000000 
000000 


MACY11 30A(1052) 


COMMON TAGS 
-SBTTL COMMON TAGS 


F 2 
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- weaker erteteeerererretrerereteerrereeerteeeeeetetetenetetneeteneeteeee 


:*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
>*USED IN THE PROGRAM. 


SCMTAG: 


STSTNM: . 
SERFLG: . 


SICNT: 
$SLPADR: 
SLPERR: 


SERTTL: . 
SITEMB: . 
SERMAX: . 
SERRPC: . 
SGDADR: . 


$BDADR: 


S$GDDAT: . 
$BDDAT: . 


$AUTOB: . 
SINTAG: . 


SWR: 


DISPLAY: 


$TKS: 
STKB: 
$TPS: 
$IPB: 
$NULL: 


$FILLS: . 


$FILLC: 


STPFLG: . 
SREGAD: . 


$REGO: 
$REGI: 
$REG2: 
$REG3: 
$REG4: 
$REGS: 
$TMPO: 
STMP1: 
STMP2: 
$TMP3: 
STMP4: 
STIMES: 
SESCAPE: 
$QUES: 
$CRLF: 
$LF: 


-= 1000 


. WORD 
. WORD 
177560 
177562 
177564 
177566 
-BYTE 


0 
0 
-ASCI1 
-ASCI1 
~ASCI2Z 


;;START OF COMMON TAGS 


3; CONTAINS THE TEST NUMBER 

3; CONTAINS ERROR FLAG 

3s; CONTAINS SUBTEST ITERATION COUNT 
:;CONTAINS SCOPE LOOP ADDRESS 

3; CONTAINS SCOPE RETURN FOR ERRORS 
>: CONTAINS TOTAL ERRORS DETECTED 
>: CONTAINS ITEM CONTROL BYTE 

s; CONTAINS MAX. ERRORS PER TEST 

3; CONTAINS PC OF LAST ERROR INSTRUCTION 
3; CONTAINS ADDRESS OF ‘GOOD' DATA 
>: CONTAINS ADDRESS OF ‘BAD' DATA 
:;CONTAINS ‘GOOD’ DATA 

;;CONTAINS ‘BAD’ DATA 

> ;RESERVED--NOT TO BE USED 


;;AUTOMATIC MODE INDICATOR 
3; INTERRUPT MODE INDICATOR 


DSWR s ADDRESS OF SWITCH REGISTER 
DDISP ; ADDRESS OF DISPLAY REGISTER 
3: TTY KBD STATUS 
3; TTY KBD BUFFER 
si TTY PRINTER STATUS REG. ADDRESS 
si TTY PRINTER BUFFER REG. ADDRESS 
>; CONTAINS NULL CHARACTER FOR FILLS 
s; CONTAINS # OF FILLER CHARACTERS REQUIRED 
2 >; INSERT FILL CHARS. AFTER A “LINE FEED" 
3 :'"TERMINAL AVAILABLE’ FLAG (BI 1<07>=U=YES) 
3; CONTAINS THE ADDRESS FROM 
s:WHICH ($REGO) WAS OBTAINED 
s: CONTAINS (($REGAD) +0) 
>; CONTAINS (($REGAD) +2) 
; CONTAINS ((S$REGAD) +4) 
s: CONTAINS (($REGAD) +6) 
>: CONTAINS (($REGAD)+10) 
>; CONTAINS (($REGAD)+12) 
3 USER DEFINED 
s USER DEFINED 
; USER DEFINED 
; USER DEFINED 
;;USER DEFINED 
7;MAX. NUMBER OF ITERATIONS 
; ESCAPE ON ERROR ADDRESS 
/?/ > ;QUESTION MARK 
<15> >; CARRIAGE RETURN 
<19> siLINE FEED 


pele leloleleolojoiojo® fel ejeieiojleilojlo) 


ODOOCOODOCOOOCCOCOCOO OCO--NO 


**@eetenereretereteerseeteseeeteteeeeteteeeteteeteetatteeeeeeteneee 
oe 


SEQ 0018 
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945 001146 


001150 
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000000 


000000 


000000 
000000 
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APT MAILBOX-E TABLE 


-SBTTL APT MAILBOX-E TABLE 


pp ereeererererererererrerrtererteretrrrreeeeeetereeeeeteetereeeeeee 


$MAIL: 3; APT MAILBOX 
SMSGTY: .WORD AMSGTY ;;MESSAGE TYPE CODE 
SFATAL: .WORD AFATAL ;;FATAL ERROR NUMBER 
STESTN: .WORD ATESTIN ;;TEST NUMBER 

$PASS: .WORD APASS 3;PASS COUNT 

SDEVCT: .WORD ADEVCT ;;DEVICE COUNT 
SUNIT: WORD AUNIT 31/0 UNIT NUMBER 


SMSGLG: .WORD AMSGLG ;;MESSAGE LENGTH 

SETABLE: >; APT ENVIRONMENT TABLE 

SENV: -BYTE AENV >; ENVLRONMENT BYTE 

SENVM: .BYTE AENVM ;;ENVIRONMENT MODE BITS 

SSWREG: .WORD ASWREG ;;APT SWITCH REGISTER 

$USWR: .WORD AUSWR ;;USER SWITCHES 

$CPUOP: .WORD ACPUOP ;;CPU TYPE,OPTIONS 

hed BITS 15-11=CPU TYPE 
11/04=01,11/05=02,11/20=03,11/40=04,11/45-05 
11/70=06,PDQ=07,Q=16 

O=REAL TIME CLOCK 

9=FLOATING POINT PROCESSOR 

8=MEMORY MANAGEMENT 


BIT | 
BIT 
BIT 


SEQ 0019 
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001150 


001150 
001152 
001154 
001156 


001160 
001162 
001164 
001166 


001170 
001172 
001174 
001176 


001200 
001202 
001204 
001206 


001210 
001212 
001214 
001216 


001220 
001222 
001224 
001226 


001230 
001232 
001254 
001236 


001240 
001242 
001244 
001246 


t om 
1 
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064640 
000000 
067764 
000000 


064640 
065061 
067764 
000000 


065013 
000000 
070006 
000000 


064640 
065072 
067764 
000000 


064666 
000000 
067772 
000000 


064660 
000000 
067770 
000000 


064650 


000000 


064724 
000000 
067764 
000000 


H 2 
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ERROR POINTER TABLE 


-SBTTL ERROR POINTER TABLE 
;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 


>*THE INFORMATION 1S OBTAINED BY USING THE INDEX NUMBER FOUND IN 
;*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE 3 PERTINENT. 


38/B RES WAS RES DST OP STC OP TEST (PC) (SP) (PSW) 
;SREGS, SREG3, SREG2, SREGI, SREGO, SERRPC, SREGS, SREGO 


— 
a 
o 


>: *NOTE1: 1— SITEMB IS O THE ONLY PERTINENT DATA IS (SERRPC 
s*NOTE2: EACH ITEM IN THE TABLE CONTAINS 4& POINTERS ENPLAINED AS FOLLOWS: 
:¢ EM >;POINTS TO THE ERROR MESSAGE 
7* DH :;POINTS TO THE DATA HEADER 
:* DT s;POINTS TO THE DATA 
:* OF ;;POINTS TO THE DATA FORMAT 
SERRTB: 
sITEM 1 
_ 3$/B DST WAS DST DEST (CIR) TEST (PC) (SP) (PSW) 
eM s$REG4, $REG3, S$REG2, SREG],$REGO,SERRPC,$REGS,$REG6 
; ITEM 2 
+e 3S8/B DST WAS DST DEST (IR) TEST (PC) (SP) (PSW) 
DH } IS R 
“ s$REG4, $REG3, S$REG2, SREGI, SREGO,SERRPC,$REGS,$REG6 
sITEM 3 
EM3 38/B SP WAS SP (IR) TEST (PC) (PSW) 
.*? :$REG4, $REG3, $REG1,$REGO,SERRPC,$REG6 
;ITEM 4 
EM4 3S8/B DST WAS DST ie (IR) TEST (PC) (SP) (PSw) 
DH4 3 13.8 
_ s$REG4, $SREG3, SREG2, SREGI, SREGO, SERRPC, SREGS, SREG6 
;ITEM 5 
e s(IR) TEST (PC) (SP) (PSW) 
* s$REG1, SREGO, SERRPC, $REGS, SREG6 
s1TEM 6 
. » Pest Cie) TEST CRC) (CSP) (<P Se) 
gt s$REG2, SREG1, SREGO, SERRPC, $REGS, SREGO 
s1TEM 7 
“ag sWAS DST DEST (IR) TEST (PC) (SP) (PSw) 
¥ :$REG3, SREG2, SREGI, SREGO, SERRPC, SREGS, $REG6 
s1TEM 19 
EM] 
0 
D 
0 


SEQ 0020 
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001250 


001256 


001260 


001266 


001270 


001276 


001300 


001326 


001330 


001336 


001340 
001342 
001344 
001346 


001350 
001352 
001354 
001356 








VO 
> La 
oo 


000000 


065335 
067373 
067664 
000000 


065374 
067373 
067664 
000000 


065426 
067373 
067664 
000006 


065446 


067756 


067035 
067607 
067670 
000000 


067006 
067607 
067670 
000000 


065705 
067607 
067670 
000000 


065535 
067336 
067640 
067760 


MACY11 30A(1052) 
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i TESTS SKIPPED 
PC EXPCTD ACTUAL (TEST #°S) 
SERRPC, STESTN,SREGO 


2 

4 DID NOT ABORT IN USER MODE 
3 

2 EXECUTED IN USER MODE 
4 

PC CHANGED PSW 


5 

;MICROBREAK TRAP-T0-4 DID NOT OCCUR 
sERRPC MEDCODE MICROBK REG. 
sSERRPC,STMPO,STMP1, 


CACHE DATA — INCORRECTLY 
: V 
;SERRPC,$REG1,$REGO,0 


+ CACHE TAG lw WRONG 
“SERRPC, $REGO. VSREGI, 0 


PHYS. BA LOGGED WRONG 
PC EXPCT RECVD 
;SERRPC,$REG1,$REGO,0 


21 
7CSP CONSTANT WRONG 
;PC MEDCODE EXPECTD RECEIVD 
;SERRPC ,STMP1,STMP2, $REGO,0 


CQKDA-D KD11-K Toa 
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ERROR POINTER TABLE SEQ 0022 
1066 
1067 s ITEM 22 
1068 001360 065560 EM22 ;BAD DATA READ BY A MED 
1069 001362 067336 DH17 7PC MEDCODE EXPECTD RECEIVD 
1070 001364 067652 DT22 sSERRPC,STMP1,STMP2,STMP3,0 
1071 001366 067760 DF17 30,0, 
1072 
1073 sI1TEM 23 
1074 001370 065607 EM23 3NO ODD PC TRAP 
1075 001372 067373 DH23 sPC 
1076 001374 067664 DT23 sSERRPC 
1077 001376 0600000 0 
1078 
H+ #84 sITEM 24 
1081 001400 065626 EM24 ;0DD ADR. BIT NOT SET IN CPU ERROR REGISTER OR LOG JAM 
1082 001402 067400 DH24 7PC CPUERR LOGJAM 
1083 001404 067670 D124 sSERRPC,$REG1,$REGO 
1084 001406 000000 0 
1085 
1086 s1TEM 25 
1087 
1088 001410 065511 EM17 3;LOG CUA LOGGED INCORRECT U-ADDR 
1089 001412 067607 DH44 PC EXPCTD RECVD 
1090 001414 067670 D124 : SERRPC $REG! $REGO 
1091 091416 000000 0 
1092 
1093 sI1TEM 26 
1094 
1095 001429 065705 EM26 ;PHYS. BA LOGGED WRONG 
1096 001422 067437 DH26 sPC PA<17:16>-EXPCT=PA<15:0> PA<17:16>-RECVD-PAK<15:0> 
1097 001424 067706 D126 sSERRPC,SREG1,$REG2,$REG0,$REG3,0 
1098 001426 000000 0 
1099 
He s1TEM 27 
1102 001430 065732 EM27 s;CACHE PARITY ERROR LOGGED IN BACK UP MODE 
1103 001432 067521 DH27 :PC LOGPBA LOGDATA LOGTAG 
1104 001434 067722 D127 sSERRPC,SREG3,$REG1,$REG2 
1105 001436 000000 9 
1106 
ies s1TEM 30 
1109 001440 066002 —M30 s CACHE PARITY TRAPPED WHEN DISABLED 
1110 001442 067373 DH23 7 PC 
1111 001444 067664 D123 s SERRPC 
ag 001446 000000 0 
be s1TEM 31 
1 
1116 001450 066605 —M31 3NO CACHE PARITY TRAP 
1117 001452 067373 DH23 3 PC 
1118 001454 067664 D123 s SERRPC 
1119 001456 000000 0 
1120 
1121 s1TEM 32 


K 2 
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CQKDAD.P11 11-SEP-79 13:31 ERROR POINTER TABLE SEQ 0023 
1122 
1123 001460 066114 EM32 MEMORY ERROR REGISTERS INCORRECT 
1124 001462 067554 DH32 :PC MEMERR 
1125 001464 067700 D125 ;SERRPC,$REGO 
157 001466 000000 0 
+136 sITEM 33 
1130 001470 066145 EM33 ; TIMEOUT BIT NOT SET IN CPU ERROR REGISTER OR LOG JAM 
1131 001472 067400 DH24 :PC CPUERR LOGJAM 
1132 001474 067670 D124 ;SERRPC, SREG1, $REGO 
1133 001476 000000 0 
1134 
+335 s1TEM 34 
6 
1137 001500 066223 EM34 :NO ILLEGAL INTERNAL ADDRESS TRAP 
1138 001502 067373 DH23 Hl 
1139 001504 067664 D123 s SERRPC 
Bee 001506 000000 0 
Neg s1TEM 35 
4 
1144 001510 066260 EM35 INTERNAL ADDRESS ERROR BIT NOT SET IN CPU ERROR REGISTER OR LOG JAM 
1145 001512 067400 DH24 >PC CPUERR LOGJAM 
1146 001514 067670 DT24 :SERRPC,$REG1,$REGO 
1147 001516 000000 0 
1148 
tees s1TEM 36 
1151 001520 066346 EM36 LAST INTERRUPT/TRAP VECTOR NOT LOGGED IN FLAG REGISTER 
1152 001522 067423 DH25 sPC FLGREG 
1153 001524 067700 DT25 sSERRPC,$REGO 
1154 001526 000000 0 
1155 
Bs s1TEM 37 
1158 001530 066423 EM37 LOG FIRST MODE DID NOT INHIBIT ERROR LOG AFTER FIRST ERROR 
1159 001532 067400 DH24 :PC CPUERR LOGJAM 
1160 001534 067670 D124 sSERRPC,$REG1,$REGO 
1161 001536 0000090 0 
1162 
er s1TEM 40 
64 
1165 001540 066516 EM4O ERROR LOG WAS NOT RE-ENABLED, ODD ADR BIT CLR IN CPUERR 
1166 001542 067400 DH24 :PC CPUERR LOGJAM 
1167 001544 067670 D124 sSERRPC,$REG1,$REGO 
1168 001546 000000 0 
1169 
1170 s1TEM 41 ! 
1172 001550 066045 EM41 INSTRUCTION NOT ABORTED IN CACHE ABORT MODE 
1173 001552 067373 DH23 3P 
1174 001554 067664 D123 ; SERRPC 
1175 001556 000000 0 
1176 
1177 ITEM 42 
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CQKDA-D KD11-K BASIC LO 
CQKDAD.P11 11-SEP-79 13:31 ERROR POINTER TABLE SEQ 0024 
1178 
1179 001560 066632 EM42 ;LO BYTE & TAG PARITY BITS NOT SET IN LOG SERVICE 
1180 001562 067570 DH42 :PC LOGSERVCE 
1181 001564 067700 D125 ;SERRPC ,$REGO,0 
1182 001566 000000 0 
1183 
+4 ITEM 43 
1186 001570 066720 EM43 ;LO BYTE & TAG PARITY BITS NOT SET IN MEM ERR REGISTER 
1187 001572 067554 DH32 :PC MEMERR 
1188 001574 067700 D125 ; SERRPC,$REGO 
1189 001576 000000 0 
1190 
ise sITEM 44 
1193 001600 067065 EMEIS1 ;E1S SET COND CODES WRONG 
1194 001602 067222 DHEIS1 ; PSW REG=WAS-REG+1 REG-S/B-REG*+1 PC TEST (IR) 
1195 001604 067734 DTEIS1 ;$REGAD $REG2 $REGS $REGI $REGS SERRPC S$REGO STMPO 
1196 001606 000000 0 
1197 
1198 sITEM 45 
1199 
1200 001610 067116 EMEIS2 ;E1S GAVE WRONG RESULT 
1201 001612 067222 DHEIS1 ; PSW REG-WAS-REG+1 REG-S/B-REG+1 PC TEST (IR) 
1202 001614 067734 DTEIS1 ;S$REGAD $REG2 $REG3 S$REGI $REG4 SERRPC $REGO $TMPO 
1203 001616 000000 0 
1204 
‘She ;1TEM 46 
1207 001620 067144 EM46 ; AUTO INCREMENT (DECREMENT) DID NOT OCCUR 
1208 001622 067263 DH46 PC (IR) TEST 
1209 001624 067746 D146 " SERRPC SimPO $REGO 
4 001626 000000 0 
1212 076600 MED = 076600 
1213 140000 UM= 140000 
1214 177770 UBREAK= 177770 
1215 177744 MEMERR=177744 
1216 177766 CPUERR=177766 
1217 177746 CCR=177746 
1218 000100 WWP=B11T6 
1219 000001 DPTRP=B1T0 
1220 000200 PABORT=B117 
1221 000100 LO=8116 
1222 000200 H1=B117 
1223 000040 TAG=B1T5 
1224 
1225 ~-EQUIV SP,KSP 
1226 
1227 
1228 7° MED OPERATION CODE DEFINITIONS 
1229 
1230 000226 WCONSSW=226 
1231 000022 RDWHAMI=022 
1232 000222 WRWHAMI=222 
1233 000144 RDFLAG=144 
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CQKDA-D KD11-K BASIC LoGlt 
CQKDAD.P11 11-SEP-79 13:31 ERROR POINTER TABLE SEQ 0025 
1234 000344 WRFLAG=344 
1235 000100 RDLJAM=100 
1236 000300 WRLJAM=300 
1237 000101 RDLSERVICE=101 
1238 000301 WRLSERVICE=301 
1239 000102 ROLPBA=102 
1240 000302 WRLPBA=302 
1241 000103 ROLCUA=103 
1242 000303 WRLCUA=303 
1243 000104 ROLFGINT=104 
1244 000304 WRLFGINT=304 
1245 000105 RDLWHAMI=105 
1246 000305 WRLWHAMI=305 
1247 000106 RDLDATA=106 
1248 000306 WRLDATA=306 
1249 000107 ROLTAG=107 
1250 000307 WRLTAG=307 
34 000071 $WB01=71 ;MICRO ADDR. IN SWAB INST. 
1253 
1254 
244 ADDRESS ASSIGNMENTS FOR DL11 CONSOLE TERMINAL INTERFACE 
1257 177560 RCSR=177560 RCVR. CONTROL / STATUS REG. ADDRESS 
1258 177562 ROBR = 177562 sRECEIVER DATA BUFFER REG. ADDR. 
1259 177564 XCSR = 177564 ; TRANSMITTER CONTROL / STATUS REG. ADDR 
1260 177566 XDBR = 177566 ; TRANSMIT DATA BUFFER REG. ADDR. 
1261 177546 LKCSR= 177546 SLINE CLOCK ADDRESS 
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CQKDAD.P11 11-SEP-79 13:31 ERROR POINTER TABLE SEQ 0026 
1263 ILIA TAT 
1264 “BCPT’’ TESTS / 
it SITTIN 
1267 é eerrrtererererrerterererererererererereteneeteeeeeteeeteeneetereeteeeeeeerese 
1268 -SBTTL BTO01 ‘BR’ TEST -POSITIVE OFFSET 
1269 ; eeaeerererereterererereeereerereeeeeeeeereeeeeeeneeaeeeataeneeterekareeeetes 
1270 
1271 001630 START: 
127 001630 000401 BT001: BR B1002 ;TEST THE BR FORWARD 
er 001632 000000 E001: HALT ;BR FAILED TO LOAD PC PROPERLY 
1276 bs REET eeeeeeeeeeeeeeeeeeeeaekenaektaeetekeeeeeaeeeeeteeteeeteees 
1277 .SBTTL BT002 ‘'BR'' TEST = NEGATIVE OFFSET 
1278 ; teeeeeerereteeerererterrrrteeeeeereeteeeeeeteeKeKeeKeeeeeeeeeeteeere 
1279 
1260 001634 000402 BT002: BR 1002 ;G0 TO TEST INSTRUCTION 
1282 001636 000403 A002: BR BT003 :GO TO NEXT TEST 
1284 001640 000000. Ex002: HALT ; JUST IN CASE 
1286 001642 000775. 1002: BR A002 ;TEST THE BR - NEG. OFFSET 
1288 001644 000000 | £2002: HALT :BR FAILED WITH NEG. OFFSET 
f+ B RKTT ekteeaeaeaeteekeerreneetetaeeteeeeee 
1291 .SBTTL BT003 "BASIC COND. BR’ TEST - FLAGS CLEARED 
1292 \ Z Seek eeeteeeeeeeeeeeteeeteeeteaeteeeteeeeeteteteeeaeeteetetene 
1293 
1294 001646 100403 BT003: BMI £003 :BR IF ‘'N'' SET 
1295 001650 001402 BEQ E003 :BR IF ‘'2'' SET 
1296 001652 102401 BVS E003 :BR IF ‘Vv’ SET 
1297 001654 103002 BCC BT004 :BR IF ‘'C'’ CLEAR 
1299 001656 000000 E003: HALT ;ERROR - ONE OF THE ABOVE BR'S FAILED 
1300 :OR THE FLAGS FAILED TO CLEAR ON ‘'START'' 
1301 001660 000772 BR BT003 [LOCK ON HARD ERROR 
Bs g SeeeeeeeeeeeeaeeeeekeeeeeeeReeeeereeeekeeeeteeeeteetektateeeeeterereteeerere 
1304 .SBTTL BT004 ‘'SCC AND COND. BR'S'’ TEST = FLAGS SET 
1305 Py SKK eeKEKAeRREEKKHRHRTAEAEKERAReKAeeKaReeeeeketetereterenese 
1306 
1307 001662 000277 BT004: SCC :MAKE N:C=1111 
1309 001664 100003 1004: BPL £004 :BR IF "'N' FAILED TO SET 
1310 001666 001002 BNE E004 :BR IF "2" FAILED TO SET 
1311 001670 102001 BvC £004 :BR IF “'V' FAILED TO SET 
1312 001672 103402 is BCS 81005 :BR IF "'C'’ SET OK 
1314 001674 000000 £004: HALT sERROR - ONE OF THE ABOVE BR'S FAILED 
1515 :OR THA SCC FAILED TO SET ALL THE FLAGS 
1316 


001676 000771 ; BR B1004 ;LOCK ON HARD ERROR 
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CL 
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0 
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Gl 
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1 
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MACY11 30A(1052) 11-SEP-79 13:53 PAGE 28 
BT004 ‘"SCC AND COND. BR'S'’ TEST = FLAGS SET 


é eererertererererererereretereeeerteteteneeeeeeeeeeereteneteeeeeeteret 


-SBTTL BT005 "’CCC AND COND. BR'S'’ TEST = FLAGS CLEARED 


; wererererrerertterrereerereerereeneeeteereereteteeeteetereneeeteneeeeeeeeee 


a ae CS 


SEQ 0027 
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— eee i ss es es ss 


001700 
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000257 
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103002 
000000 
000771 


000257 
005900 
001492 


000000 
000773 


005000 
000257 


005700 
001402 
000000 
000772 


005000 
000257 
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000771 
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BT005 ‘"CCC AND COND. BR'S'’ TEST = FLAGS CLEARED 
BT005: CCC 7 MAKE N:C=0000 
1005: BMl £005 ;BR IF ‘'N’’ STILL SET 

BEQ £005 ;BR IF "'2"* STILL SET 

BVS £005 ;BR IF ‘'v’’ STILL SET 

BCC B1006 ;BR IF ‘'C'’ GOT CLEARED 
£005: HALT ERROR - ONE OF THE ABOVE BR'S FAILED 


;OR THE CCC FAILED TO CLEAR ALL FLAGS 


BR B1005 ;LOCK ON HARD ERROR 


; wearer eteerrereterereeeeeterereereerererereteeteeetteeteereeeeeeeteeeetenese 


-SBTTL BT006 "CLR %R' TEST = SETS THE ‘'2"' BIT 


; weeeeorerrereeetetereeeretetereteeeeeeteReaeeeekeeeeeeeeetateteteteeeeese 


B1006: CCC :MAKE N:C=0000 

1006: CLR RO :TEST THE CLR - IT SHOULD SET ‘'2"' 
BEQ 81007 :BR IF CLR SET "2" 

£006: HALT sERROR - CLR FAILED TO SET ‘'2"" 
BR B1006 “LOCK ON HARD ERROR 


3 Reeeeeeeteeeeeeeteetaeeteeeteereeretetreterekeeeeeetneeeeeeeeeeeeneteateeee 


-SBTTL BI007 “TST &R' TEST = USING THE CLR 


$ ereeeeeeereereeeeeeeeeeeeeteeeeeeeeeeeeeeeeeeeeeaeeeeneeeeeetreneeteteneeee 


BI007: CLR RO ;MAKE CROJ = 000000 
CCC ;MAKE N:C= 0000 


1007: TST RO TEST THE TST = IT SHOULD SET ‘2" 
BEQ B1010 ;BR IF ‘'2"' SET OK 
E007: HALT sERROR - CLR FAILED TO LOAD RO WITH 
;ALL ZEROES OR TST FAILED 
BR B1007 ;LOCK ON HARD ERROR 
p teeeeerererererererertrrrertrentetetetereee ener tere ereneeeereene 


.SBTTL BT010 ‘COM %R'' TEST = SHOULD SET ‘'N’’ AND ‘'C’’ 


; eeeeeerereteeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeteeeeeeeeneeeeetese 


BT010: CLR RO ;MAKE CROJ = 000000 
ccc MAKE N:C= 0000 
1010: COM RO ;TEST THE COM = CROJ S/B = 177777 
BPL £010 ;BR IF ‘'N’’ FAILED TO SET 
BCS B1011 :BR IF ‘'C’’ SET OK 
£010: HALT ERROR - COM FAILED 
BR B1010 ;LOCK ON HARD ERROR 


2 aeeeeeteeneereereeeeeteretereneeeeereteeeteeeteteneeeeeeeteeeeetetetete 


-SBTTL BTO11 “COM %R AND ADC &R" TEST 


——— 


SEQ 0028 


3 eee 
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CQKDAD.P11 11-SEP-79 13:31 BT011 "COM ZR AND ADC ZR" T SEQ 0029 

1378 ; teeererererererererrerererertererertererereeeeeeereteeetenereeeeeee 

1379 

1380 001762 005000 BTO11: CLR RO ;MAKE CROJ = 000000 

tt 001764 000257 ccc ;MAKE N:C=0000 

1383 001766 005100 1011: COM RO ;TEST THE COM = CROJ S/B = 177777 

eee 001770 005500 ADC RO ;TEST THE ADC - CROJ S/B = 000000 

1386 001772 001001 BNE E011 ;BR if ‘'2'' DID NOT SET 

t+ $4 001774 103402 BCS BI012 ;BR IF ‘'C’’ SET OK 

1389 001776 000000 £011: HALT ;ERROR - COM OR ADC FAILED 

4 002000 000770 BR BT011 ;LOCK ON HARD ERROR 

1392 jp teeeeeetretereteterrerereterretereteteeKeeeetKeeeeeKeeeeeteTerereee 

1393 ~SBITL BTO12 "MOV #N,R' TEST WITH N=177777,CRJ=000000 

1394 jp wteeeererrerereteteterereereteererrteeeeeeReeteeeeeeeKeeeeeerereee eee 

1395 

1396 002002 005000 BTO12: CLR RO :MAKE CROJ = 000000 

1 eye 002004 000257 ccc :MAKE N:C= 0000 

lane 002006 012700 177777 1012: MOv #-1,R0 :TEST THE MOV = CRO] S/B = 177777 

1401 002012 005100 COM RO ; MAKE A ¢ — 

es | 002014 001402 BEQ B1013 ;BR IF 

1404 002016 000000 E012: HALT ERROR - MOV FAILED TO LOAD RO WITH ALL 1°S 

ed 002020 000770 BR BTO12 ;LOCK ON HARD ERROR 

4 

1407 s eeeeeeereeetetterereretereereetere reer eee eee eee ETAT Ree EE 

1408 -SBTTL BTO13 "MOV #N,R'’ TEST WITH N=000000,(RIJ=177777 

1409 ; eeeeeeeereererertreretrrerteereterteeeeKeeKeKeeeeeteneeeetereneeees 

1410 

1411 002022 005000 BT013: CLR RO sMAKE CROJ = 000000 

1412 002024 005100 COM RO sMAKE CROJ = 177777 

ear 002026 000257 ccc SCOPE SYNC 

414 

th 002030 012700 000000 1013: MOv #0,R0 ;TEST THE MOV = CROJ] S/B = 000000 

416 

1417 002034 005100 COM RO sMAKE CRO) = 177777, SET ‘'C"’ 

1418 002036 005500 ADC RO :MAKE CROJ = 000000 

et 002040 001402 BEQ BI014 ;BR IF ‘'2"' GOT SET 

4 

1421 002042 000000 £013: HALT ;ERROR - MOV FAILED TO CLEAR RO 

1422 002044 000766 BR B1013 ;LOCK ON HARD ERROR 

rat js teeeeeeerererterrereretreereereeteeeeeereeeee tee eeAeeeee eee ATES 

1425 ~-SBTTL BI014 "CLR (R)*' TEST - CR] = 177776 

1426 jp teeetereeerererererererttreteeeeeeeeeeeeeeeteneeeeneeneeeeeeeererete 

1427 

1428 002046 012706 001000 BT014: MOV WSTACK , SP SET UP STACK POINTER 

1429 002052 012700 177776 MOV #PSW,RO ;RO POINTS TO PSWw 

in 002056 000277 $cc :MAKE CPSWJ = 017 

4 

1432 002060 005010 1014: CLR (RO) TEST THE CLR = IT SHOULD CLEAR PSw 


C 
C 
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002064 
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002070 
002074 


002076 
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002104 


002106 
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002114 


002116 
002122 


002124 


002126 
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002134 


002136 
002140 
002142 


002144 
002150 
002152 
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001002 


000000 
000767 


012700 
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005020 
001002 


000000 
000771 


005700 
001402 


000060 
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012700 
000257 


005110 


100003 
001002 
102001 
103403 


005010 
000000 
000705 


012700 
005010 
000257 


005120 


100003 
001002 


0G 
9 
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177776 


177776 


177776 


rn 
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BT014 “CLR (RD TEST = CRI = 177776 SEQ 0030 
BNE B1015 ;BR IF CLR MADE ‘2°’ = 0 = IT SHOULD 
E014: HALT ;ERROR- CLR FAILED TO CLEAR PSW 
BR P1014 ;LOCK ON HARD ERROR 


; keretrerrerererererererererererereerreererereeeteteeteeekreeeeeeteteeeeeeteete 


-SBTTL BTO15 “CLR (R)*'’ TEST = CR] = 177776 


; erenrerererreretereereetererereeeteeeeeeteeenteeeeteeteeeeeeeeteteneeeerene 


BT1015: MOv #PSW,RO ;RO POINTS TO PSW 


scc ;MAKE CPSW) = 017 
1015: CLR (RO) + ;TEST THE CLR - IT SHOULD CLEAR PSW 
BNE A015 ;BR IF CLR MADE "2" = 0 = IT SHOULD 
E1015A: HALT ERROR CLR FAILED TO CLEAR PSwW 
BR BT1015 ;LOCK ON HARD ERROR 
A015: TST RO ;AUTO INC SHOULD ZERO RO 
BEQ B1016 ;BR IF IT DID 
£2015: HALT sERROR - AUTOINC. FAILED 
BR B1015 ;LOCK ON HARD ERROR 


-SBTTL BT016 ‘COM (R)' TEST = CR] = 177776 


: ereeererereeeeeeeeeteereeee teeter teeeeeeeeteeeneeeeeeeeteteeeteteeene 


BTI016: MOV #PSwW,RO ;RO POINTS TO PSW 
ccc ;MAKE CPSw) = 000 


1016: COM (RO) TEST THE COM = CPSW) S/B = 357 


BPL E016 rNiC=1111 2 

BNE E016 
BvC E016 
BCS BI017 


E016: CLR (RO) ;GO TO KERNEL MODE 
HALT ;ERROR - COM FAILED TO MAKE [PSW} = 357 
BR B1016 ;LOCK ON HARD ERROR 


S eeeterereeerereereeererererereteteeeterteeeeeeeeeeeeeeteeeteeetetetetes 


~-SBTTL BIO17 “COM (RO)*"’ TEST = CRO] = 177776 


: eeerererererereeetererereereeteeeeteeeeeneeeeeeeeeeeeeeeetenraeeeeeeneee 


B1017: MOv #PSwW,RO ;RO POINTS TO PSW 
CLR (RO) sMAKE CPSW) = 000 
ccc SCOPE SYNC 


1017: COM (RO)* :TEST THE COM = [PSW) S/B = 35? 


BPL EAQ17 gN:C = 1111 ? 
BNE EAOI7 


MH e*ererterererterereeteeeereerereeeeeteteeeeeeteeeeeeeeeeeeeeeeneeteteeetese 
| 
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COKDAD.P11 1 1-SEP=79 13:31 BIO17 “COM (RO)*" TEST - CROJ = 177776 SEQ 0031 
1490 002162 102001 BvC —s EAN 
1491 002164 103405 BCS sO 
1498 002166 012701 177776 EAQI7: MOV #PSW.RI 
149% 002172 005011 CLR (R1) 
1495 002174 000000 HALT COM FAILED TO SET ALL FLAGS 
1496 002176 000762 BR e1017 “LOCK ON HARD ERROR 
1498 002200 005100 A017: COM —-RO :SHOULD MAKE (ROJ = 177777 
1499 002202 005500 ADC RO “SHOULD MAKE [RO] = 000000 
1300 002204 001405 BEQ —s- BT020 
1502 002206 012701 177776 E2017: MOV —s#P SwRI 
1503 002212 005011 CLR (RI) 
1504 002214 000000 HALT “ERROR = COM FAILED TO AUTO INC. RO 
1308 002216 000752 BR BT017 “LOCK ON HARD ERROR 
1507 4 Reeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeereeeaeeteetaeeteteaeteeeeteeeeeeaenese 
“SBITL B1020 "MOV RA.RB' TEST - WITH CRAJ=177777.(RB1=000000 

1509 § ekereneeeeeraeererteeeeeeeeeeeeeeeeeeeeetenkReneanaeeeneaneeeeeeeeeeaeneeeeenet 
1510 
1511 002220 012700 177776 B1020: MOV _—s #PSw, RO 
1512 002224 005010 CLR (RO) 
1513 002226 005000 CLR = RO -MAKE £R0J=000000 
1514 002280 005001 CLR RI “MAKE £R1]=000000 
1515 002282 005101 COM RT “MAKE (R1}=0207777 
1516 002234 000257 CCC “SCOPE SYNC 
1318 002286 010100 1020: MOV’ RI. RO “TEST THE MOV 
1320 002240 100402 BM] A020 <BR IF “'N' GOT SET 
1522 002242 000000 A020: HALT SERROR-MOV FAILED TO SET “'N" 
1523 002244 000765 BR 81020 “LOCK ON HARD ERROR 

4 
1525 002246 005100 A020: COM RO :£R0] SHOULD GO TO 000000 
1526 002250 001402 BEQ —sBTO21 “BR IF 17 DID 
1528 002252 000000 £2020: HALT SERROR-MOV FAILED TO LOAD RO wITH 1°S 
1529 002254 000761 BR B1020 “LOCK ON HARD ERROR 
tts 2 eer eeeeeeeeeeeeereeeeeeeeeeeeeeeteeeeeeeteeeekeeeeeeteeeeeeeteeeeeteeese 
1532 “SBITL BT021 "MOV RA.RB' TEST WITH CRAJ=000000,(RB)=177777 | 
15 , eeereeeeereeeeeeereeerereeeeeereeeeeeeeeeeeeeeeeaeeeeeeeeteaneeneeetenetee 
1534 
1535 002256 005000 B1021: CLR RO :MAKE £R0]=000000 | 
1536 002260 005100 COM RO “MAKE CROJ=177777 
1537 002262 005001 CLR “MAKE £R1]=000000 
1338 002264 000257 aa “SCOPE SYNC | 
1540 002266 010100 1021: MOV RI, RO STEST THE MOV 
1541 
1542 002270 001402 Bea sé :BR IF 2" GOT SET 
154 
1$44 002272 000000 EAO21: HALT -MOV FAILED 10 SET "2" 
1545 002274 000770 BR B1021 “LOCK ON HARD ERROR | 
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3 
13:53 
B1021 ‘MOV RA,RB'' TEST WITH CRAJ= 


PAGE 33 
A}=000000,(RBJ=177777 


AO21: COM RO ;SHOULD MAKE (ROJ=177777 AND SET ‘'C"’ 


ADC RO ;SHOULD MAKE (ROJ=000000 
BEQ 21022 ;BR IF ‘2°’ SET 
E2021: HALT sMOV FAILED TO ZERO RO 


BR 81021 


; ereretrereerereretereeereeeteeteetereeeeeeeeeeeeeeeaeeeteteneeteeeeene 


-SBTTL BTO22 ‘MOV #N,QM#A"’ TEST WITH N=17,A=177776 


bs eeerererertereretereeeereereeteeteeteeeeeeeereeeeeeeeteeeeeneeeeeeeteeteeeenenee 


;LOCK ON HARD ERROR 


BT1022: CCC sMAKE CPSWJ=000 
1022: MOv #17,aePSwW : TEST THE MOV 
BPL E022 N:C=1111 
BNE E022 
Bvc E022 
BCS B1023 


;MOV FAILED TO LOAD PSw 


E022: HALT 
BR B1022 ;LOCK ON HARD ERROR 


; eeeerrreerereeteeeeeeeeteeeeeeeeeeeeeeeeeeeeeeeeeeeeeneeeeeeeeeeeeeee 


-SBTTL B1023 ‘MOV RA,(RB)+'’ TEST WITH CRAJ=17,(RBJ=177776 


3 eeeeeteeeteereteteereeeeeetereteeeeeteteeeteeeeeeeteteeeeneeteeeeeeeeee 


B1023: MOV #PSwW,RO :RO POINTS TO PSw 
MOV #17,R1 ;CSOURCEJ=017 
CCC :SCOPE SYNC - MAKE <N:C> = 0000 
1023: MoV R1,(RO)+ :TEST THE MOV 
BPL EA023 sN:C = 1111 ? 
BNE EA023 
BvCc EA023 
BCS A023 
£A023: HALT :MOV FAILED TO LOAD PSw 
BR B1023 ;LOCK ON HARD ERROR 
A023: TST RO :D1D AUTO INC MAKE RO GO T0 9? 
BEQ B1024 sBR IF IT DID 
£2023: HALT :MOV FAILED TO AUTO INC. RO 
BR B1023 ;LOCK ON HARD ERROR 


; aeereeereeerrerersetereererereeeterereretrekreereteeeeeeteeeteteneteereetetese 


-SBITL BI024 “'CMP WN,aMA'’ TEST WITH N=(A) 


s eeeeeeeeeeereeeeerereereeeteeeeeeeteereteteteeneeeeeeeteteeeeetereeeerese 


B1024: MOV #PSwW,RO RO POINTS TO PSW 
CLR (RO) ;MAKE (CPSwWJ=000 
273 sMAKE N:C=1011 


SEQ 0032 
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CQKDAD.P11 11-SEP-79 13:31 
ot 002404 022737 000013 
1604 002412 001402 
1605 
1606 002414 000000 
1607 002416 000766 
1608 
1609 
1610 
1611 
1612 
veh 002420 000257 
eds 002422 022737 000017 
1617 002430 001401 
ete 002432 000402 
1620 002434 000000 
1621 002436 000770 
1622 
1623 
1624 
1625 
ot 002440 000277 
Hb 002442 022737 000000 

6 
1630 002450 001401 

1631 002452 000402 

1632 
1633 002454 000000 

1634 002456 000770 

1635 
1636 

1637 

1638 

1639 

1640 002460 012700 177777 
1641 002464 000257 

1642 

1643 002466 020027 177777 
1644 

1645 002472 001402 

1646 

1647 002474 000000 

1648 002476 000770 

1649 

1650 

1651 

1652 

1653 

1654 002500 012700 000001 
a 002504 000264 

656 

1057 002506 020027 177777 


177776 


177776 


177776 


H 3 
MACY11 3CA(1052) 11-SEP-79 13:53 PAGE 34 
BI024 "CMP #N, aA" TEST WITH N=(A) 


1024: CMP #13,aePSw ; TEST THE CMP 
BEQ B1025 ;BR IF °“'2'* GOT SET 
E024: HALT ;CMP FAILED TO SET ‘2°’ 
BR BI1024 ;LOCK ON HARD ERROR 


H etereererererererereneteterereeeteteeeeeeteteeeteteeeeaeeeeeeeeeeeeeeet 


-SBTTL B1025 "CMP #N,aMA’’ WITH N > (A) 


3 eereteerrreererrererererereeeeeeereereeteeeeeteeeateeeheeteeeeeeteteteneees 


B1025: CCC sMAKE CPSWJ=000 

1025: CMP #17, a#PSW ;TEST THE CMP 
BEQ E025 ;BR IF ‘2°’ GOT SET 
BR B1026 ;GO TO NEXT TEST 

E025: HALT ;CMP FAILED TO CLEAR ‘2°’ 
BR B1025 ;LOCK ON HARD ERROR 


: aeeterereeereeeeeteeeteteeeeeeeeeereeeeereeeeene teehee eeetenereeeeeeet 


-SBTTL BT026 "CMP @#N,QMA"' WITH N << (A) 


3 eraeteereereeereeeeeeeeretereereeeeeeeeeeeeteeeeeeeheteeeeeeeteeeeeeeete 


B1026: scc ;MAKE CPSWJ=017 

1026: CMP #0,a#PSW 7 TEST THE CMP 
BEQ E026 ;BR IF ‘2°’ GOT SET 
BR B1027 3GO0 TO NEXT TEST 

E026: HALT CMP FAILED TO CLEAR ‘'2"° 
BR B1026 ;LOCK ON HARD ERROR 


Z weeneeereererereereerrererereeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeneeeeetetenet 


-SBTTL BT027 ‘'CMP R,#WN'’ TEST WITH CRI=N 


2 weeerreerererereereerereereetrereteteteeeeeeeeeeeteeeeeeeheneeeteteetenet 


B1027: MOV #-1,R0 sMAKE CROJ=177777 
ccc 7N:C=0000 
1027: CMP RO,#-1 sTEST THE CMP 
BEQ B1030 :BR IF CMP SET ‘'2"' 
E027: HALT sCMP FAILED 
BR B1027 ;LOCK ON HARD ERROR 


3 weeeeeeereeereerererererrteereeteereeeeeeteeeeeeeeeaneeeneteeeeeeteetenest 


.SBTTL B1030 ‘'CMP R,WN'' TEST WITH [RJ] > N 


z e@eetererereerreeeeeeeeretewterteeeeeereeeeeeeeeeeeeeeeeeeeteteeeteneeese 


B1030: MOV #1,R0 ;MAKE (ROJ=000001 
SEZ ;SET THE ‘'2"’ BIT 
1030: CMP RO,#-1 sTEST THE CMP 


SEQ 0033 
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CQKDAD.P11 


002512 


002514 
002516 


002520 
002524 


002526 
002532 


002534 
002536 


002540 
002544 
002552 
002556 
002560 
002562 


002564 
002566 


002570 
002572 


002574 
002576 


002600 
002604 
002612 
002616 
902620 
002622 


002624 


002626 
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001002 


000000 
000770 


012700 
000264 


020027 
901002 


000000 
000770 


012700 
012737 
012701 
000257 
022001 
001402 


000000 
000764 


005700 
001402 


000000 
000760 


001002 


000000 
000764 
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BT030 ‘CMP R,WN' TEST WITH CR] > N 


BNE B1031 ;BR IF CMP CLEARED ‘'2"' 
£030: HALT :CMP FAILED 
BR B1030 ;LOCK ON HARD ERROR 


4 eeretererrererererrerereereeeeteererereneeteeeeteeeeteeeeeteeteeeeteteeee 


-SBTTL BT031 “CMP R,MN'’ TEST WITH CR] < N 


; eerererertereerreereteeeterereeetereeeereeeteteeaneeeeteeeneeeeeteteeeeeene 


BI031: MmOv #1,R0 ;MAKE CRO) = ot ja 
SE2 ;SET THE ‘'2"' B 

i031: CMP RO,#1? ; TEST THE CMP 
BNE B1032 BR IF CMP CLEARED *'27"' 

£031: HALT ;CMP FAILED TO SET ‘2°’ 
BR 81031 ;LOCK ON HARD ERROR 


; eerereteeretereeeereeeeteeeereeeeeteeeeeeeraeeeeeeeeneeeeeeeteteeeeeteeee 


-SBTTL BTO32 “'CMP (RA)*+,RB'’ TEST WITH CSOURCEJ=(RBJ 


; eererkeerererereereerereereeeeeeeeteeeeeeeeeeweeteneneneeeeeeeteeeereeeeeee 


B1032: MOV #PSw,RO :RO POINTS TO PSw 
MOV #340,a#PSW sMAKE CPSWJ=340 
MOV #340,R1 ;MAKE CDESTIJ=340 
CCC 3N:C=0000 
1032: CMP (RO)+,R1 : TEST THE CMP 
BEQ A032 ;BR IF ‘2°’ GOT SET 
£A032: HALT ;CMP FAILED TO ACCESS PSw 
Re B1032 :LOCK ON HARD ERROR 
AQ32: TST RO 3''2'' SHOULD SET 
BEQ B1033 ;BR IF ‘'2°' SET 
£2032: HALT :CMP FAILED TO AUTO INC. RO 
BR B1032 sLOCK ON HARD ERROR 


s aeeereeereereretetereterereeretereteeteeteereteeeeneeteeeeeteteeteeeetetee 


~-SBTTL BT033 "CMP (RA)+,RB'' TEST WITH CSOURCE )>CRB) 


; eerwererereeeeeeereeeeeeeeeeeereeeeeeereeeeeeeeeeeeaeeeeeeeeeeeeeeeteeest 


B1033: MOv #PSW,RO ;RO POINTS TO PSWw 
MOV #540,a#PSW ;MAKE CPSW)=340 
MOV #330,R1 sMAKE CDESTJ=330 
SEZ 3SET THE “'2"° BIT 
1033: CMP (RO)+,R1 ;TEST THE CMP 
BNE A033 ;BR IF ‘2°’ GOT CLEARED 
EAQ33: HALT 7CMP FAILED TO ACCESS PSw 
BR B1035 ;LOCK ON HARD ERROR 





j 
—s 


CQKDA-D KD11-K BAS] 


3 
C LO ESTS MACY11 30A(1052) 11-SEP-79 13:53 
CQKDAD.P11 11-SEP-79 1 4 


PAGE 36 
BI033 "CMP (RA)+,RB'’ TEST WITH CSOURCEJ>CRB) SEQ 0035 


1769 s eereerereringeterterereeteraneteereeeteteeteeteeeeeeeteteneeeeeeneereneee 





1714 
1715 002630 005700 A033: TST RO :""2'' SHOULD SET 
rie 002632 001402 BEQ B1034 :BR IF "'2"' SET 
1718 002634 000000 £2033: HALT :CMP FAILED TO AUTO INC. RO 
1719 002636 000760 BR B1033 :LOCK ON HARD ERROR 
1720 3 SeeeeeeeeeeeeeeeeeeeteeeeteteeteReeeeeereteeeteeteaeeeeeeeeteteteeeetertete 
1721 -SBTTL BT034 "CMP (RA)*+,RB"’ TEST WITH CSOURCEJ<CRB) 
1722 H ReeeTeeeeereereeeeeeeeeeeeeeeteeteketeeeeeeeaaeneeneeaeeteentetketevereeeneeeete 
1723 
1724 002640 012700 177776 B1034: MOV #PSw,RO :RO POINTS TO PSw 
1725 002644 012737 000330 177776 MOV #330,aaPSW ;MAKE CPSWJ=330 
1726 002652 012701 000340 MOV #340,R1 ;MAKE CDESTJ=340 
4644 002656 000264 SEZ 3SET THE “'2'’ BIT 
40 34 002660 022001 1034: CMP (RO)+,R1 :TEST THE CMP 
44 002662 001002 BNE A034 :BR IF ‘'2°' GOT CLEARED 
1733 002664 000000 EAQ34: HALT :CMP FAILED TO ACCESS PSW 
ft 002666 000764 Bie B1034 :LOCK ON HARD ERROR 
1736 002670 005700 A034: TST RO 3''7"' SHOULD SET 
rer 002672 001402 BEQ B1035 :BR IF ‘'2"' SET 
1739 002674 000000 £2034: HALT :CMP FAILED TO AUTO INC. RO 
1740 002676 000760 Hk B1034 :LOCK ON HARD ERROR 
1741 ; teeeeeetrrreeeerereeeterereereeeeteteeekeeeeeeeKeKeeeReeeeee rete ee 
1742 .SBTTL BT035 ‘'CMP RA,RB'' TEST WITH CRA] = CRB) 
1743 ; eeeeeeteererrererereritererereeereeeeeeeeKeeeeeeeeeKeee Aree eA 
1744 
1745 002700 012700 125252 B1035: MOV #125252,R0 sMAKE CRO] = 125252 
1746 002704 010001 MOV RO,R1 sMAKE CRI] = 125252 
a4 002706 000257 ccc ;SCOPE SYNC 

4 
ies (02710 020100 1035: CMP R1,R0 TEST THE CMP 
184! 002712 001402 BEQ B1036 ;BR IF ‘'2°' GOT SET 
1753 002714 000000 E035: HALT sERROR - CMP FAILED TO SET ‘'7"' 
1754 002716 000770 BR B1035 LOCK ON HARD ERROR 
1755 2 Ree eeeeeeeeeAeeeeeeeeeeeeeeetaeeeeeeeetekeeteeeteeteteeeeteneeeeeeret 
1756 .SBTTL B1036 ‘CMP RA,RB'' TEST WITH CRA < CRB) 
1757 5 Ree eee eee eeeeeteataetetektetetee 
1758 
1759 002720 012700 025252 B1036: MOV #25252,R0 sMAKE CRO] = 25252 
1760 002724 005001 CLR R1 ;MAKE CR1J] = 000000 
+444 002726 000264 SEZ sSCOPE SYNC = SET ‘'2"" 

6 
ire 002730 020100 1036: CMP R1,R0 :TEST THE CMP 

64 
bas 002732 001002 BNE B1037 ;BR IF ‘2°’ GOT CLEARED 
1766 
1767 002734 000000 £036: HALT sERROR - CMP FAILED TO SET ‘'2"' 
1768 002736 000770 BR B1036 sLOCK ON HARD ERROR 

i] 


es 1 20S <a. 

CQKDA-) KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 37 
CQKDAD.P11 11-SEP-79 13:31 B1037 “CMP RA,RB’’ TEST WITH CRA] > CRB) SEQ 0036 

1770 -SBTTL B1037 “CMP RA,RB’’ TEST WITH CRA) > CRBJ 

1771 p teeeeeerererereretretseteriereeeererereeetKeteneeteretererereereeet 

1772 

1773 002740 005000 B1037: CLR RO ;MAKE CROJ = 000000 

1774 002742 012701 000017 MOV #17,R1 sMAKE CRI] = 000017 

4G 002746 000264 SEZ sSCOPE SYNC = SET ‘'2"' 

4A 44 002750 020100 1037: CMP R1,R0 ;TEST THE CMP 

+ A 002752 001002 BNE B1040 ;BR IF ‘'2'' GOT CLEARED 

1781 002754 000000 £037: HALT sERROR - CMP FAILED 70 SET ‘'2"’ 

44 002756 000770 BR B1037 ;LOCK ON HARD ERROR 

1784 p eeeeeterertrererreeeterertrereeereeeeeeeeeeeeeKe eee eee eee eee 

1785 -SBITL BT040 ‘MOV (RA),RB'’ TEST WITH CSOURCEJ=CRBIJ=17 

1786 jp teeeeeererrertrrrerterrrrereeteretrrreeeeeeeeeeeeee eee eee eee eee 

1787 

1788 002760 012700 177776 BT040: MOV #PSwW,RO ;RO POINTS TO PSW 

1789 002764 005010 CLR (RO) ;MAKE CPSW1=000 

1790 002766 005001 CLR R1 ;MAKE CR1J=000000 

f+ 44 002770 000277 scc >MAKE N:C=1111 

hee 002772 011001 1040: MOV (RO) ,R1 ; TEST THE MOV 

1795 002774 020127 000017 CMP R1,#17 :D1D R1 GET LOADED WITH 000017 ? 

ie 003000 001402 BEQ B1041 ;BR IF YES 

1798 003002 000000 £040: HALT :MOV FAILED TO LOAD R1 

1799 003004 000765 BR B1T040 ;LOCK ON HARD ERROR 

1800 ; teeeetetetetetrtrerrrtree trite terete eee eee ee ATA eee eee 

1801 ~SBTTL BT041 ‘MOV (RA)+,RB'’ TEST WITH CSOURCEJ=CRBJ=17 

1802 ; eeenteeeeeteerereeteerereretere etree ete eee eee AAT e TEE 


1805 003012 005010 CLR (RO) ;MAKE CPSWJ=000 


1806 003014 005001 CLR R1 ;MAKE CRIJ= or 
74 003016 000277 $cc MAKE N:C=111 
1809 003020 012001 1041: MOV (RO)+,R1 TEST THE MOV 


003022 020127 000017 CMP R1,#17 ;D1D R1 GET LOADED WITH 000017 ? 
003026 001402 BEQ A041 ;BR IF YES 


003030 000000 EAO41: HALT :MOV FAILED TO LOAD R1 
003032 000765 BR B1041 ;LOCK ON HARD ERROR 


003034 0057900 AQ41: TST RO :‘2"' SHOULD SET 
003036 001402 BEQ B1042 ;BR IF ‘'2"* GOT SET 


003040 000000 £2041: HALT MOV FAILED TO AUTO INC. RO 
003042 000761 BR B1041 ;LOCK ON HARD ERROR 


ee ee eet est et 
Go OD Op On OD Op OD OD CD CD OD OD 
Ta RO we ee es os 
—COO@nG UVF wnN—oO 


1823 p eeeeeerrererereeeereerteetererereeeetettererenereeeetereeereneeTees 


1824 ~SBTTL BT042 "*XOR RA,RB’ TEST WITH CRA) = CRB) = 000000 


1825 j teeererereeereeerereererieterereterteeterteeeeeeteeeeeteteneneeeees 


1803 
1804 003006 012700 177776 BT041: MOV #PSW,RO ;RO POINTS TO PSW 
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SEP-7 


005000 
005001 
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074100 


005700 
001402 


000000 
000770 


005000 
005100 
010001 
000257 


074100 


005700 
001402 


000000 
000767 


012701 
012700 
000257 
074100 


020027 
001402 


000000 
000400 


012700 
012701 
000257 
074100 


020027 


LOGIC 


r TESTS 
9 13:3) 


177777 


177777 


zz 
MACY11 30A(1052) 11-SEP-79 13:53 PAGE 38 
BT042 "XOR RA,RB'’ TEST WITH CRA] = CRB) = 000000 
BT042: CiR RO ;MAKE CROJ = 000000 
CLR R1 ;MAKE CRI) = 000000 
ccc SCOPE SYNC 
1042:  XOR R1,R0 ; TEST THE XOR 
TST RO ;RESULT = 000000 ? 
BEQ B1043 sBR IF YES 
E042: HALT ;XOR FAILED 
BR BT042 


3 geerreerrerrerererereereerteteereteeeereeeeekereeeeaeeeeeeeneetenteeeeeeeeee 


-SBTTL BT1043 "’XOR RA,RB TEST WITH CRA] = CRB) = 177777 


3 eeerererereeeeteereeeereteeeereeeeeteeteeteeteeteneeeereeeeeeeeeeeeteenene 


B1043: CLR RO sMAKE CROJ) = 177777 
COM RO 
MOV RO,R1 sMAKE CRI) = 177777 
ccc SCOPE SYNC 

1043:  XOR R1,R0 ; TEST THE XOR 
TST RO ;RESULT = 000000 ? 
BEQ B1044 ;BR IF YES 

E043: HALT MOR FAILED 
BR BT043 ;LOCK ON HARD ERROR 


4 eKaeeeeeeeeeeeeeeereeeeeereereteeeteeeereeteekeneeteteeeeeteteeeeteereeeeene 


-SBTTL BT044 “'XOR RA,RB'’ TEST WITH CRBJ=052525,CRAJ=125252 


2 SHREK AERA eee eee eeKeteeeketeeeeeeteeteeeeteeeeeee 


B1044: MOV #125252,R1 MAKE CR1J=125252 
MOV #052525,R0 sMAKE CROJ=052525 
ccc SCOPE SYNC 

1044: XOR R1,R0 TEST THE XOR 
CMP RO,#-1 sRESULT = 177777 ? 
BEQ B1045 ;BR IF YES 

£044: HALT :XOR FAILED 
BR BT045 ;LOCK ON HARD ERROR 


2 eeeereereeeeerereeeeeeeeeeeeee eee ekeetetkeereeeteteeeteeeee 


-SBTTL BT045 "XOR RA,RB' TEST WITH CRAJ=052525,(RBI=125252 


Ps eeraecereererereeeteeeetereerereeeeeeeeeeeeeeeeeeeeeaeteeeeeeeeeeeteeeeeee 


BT045: MOV #125252,R0 sMAKE CROJ=125252 
MOV #052525,R1 sMAKE (R1)=052525 
ccc SCOPE SYNC 

1045:  XOR R1,R0 ; TEST THE XOR 
CMP RO, #1 sRESULT = 177777 ? 


SEQ 0037 


3 

CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 39 

CQKDAD.P11 11-SEP-79 13:31 BT045 “"XOR RA,RB'’ TEST WITH CRAJ=052525,(RBI=125252 SEQ 0038 
ent 003154 001402 BEQ B1046 ;BR IF YES 
1884 003156 000000 £045: HALT MOR FAILED 
b+ +4 003160 000765 BR 21045 ;LOCK ON HARD ERROR 
1887 jp teeeererererererrerrereeeerreeerreeteneeeereeeeeeetereteneeeerene 
1888 -SBTTL BT046 GPR ADDRESS INTERRACTION TEST 
1889 s teeererererererrertrerrertiteerrereeeteeeeeeKeeeeeeeKereereeeeeees 
1890 
1891 003162 012700 125252 B1046: MOV #125252,R0 CROJ = 125252 
1892 003166 010001 MOV RO,R1 
1893 003170 005101 COM R1 sCR1] = 052525 
1894 003172 010102 MOV R1,R2 
1895 003174 005102 COM R2 sCR2] = 125252 
1896 003176 010203 MOV R2,R3 
1897 003200 005103 COM R3 :€R3] = 052525 
1898 003202 010304 MOV R3,R4 
1899 003204 005104 COM RG :CR4] = 125252 
1900 003206 010405 MOV R4,R5 
+44 003210 005105 COM R5 CR5] = 052525 
1903 003212 074100 1046:  XOR R1,RO :;CRO) S/B = 177777 
1904 003214 074200 XOR R2,R0 :CRO] S$/B = 125252 
1905 003216 074300 XOR R3,R0 :CROJ S/B = 177777 
1906 003220 074400 XOR R4,RO :CROJ S/B = 125252 
1907 003222 074500 XOR R5,R0 ;CROJ S/B = 177777 
oes 003224 005100 COM RO CROJ S/B = 000000 
at 003226 001402 BEQ A046 :BR IF CROJ WAS 000000 
1912 003230 000000 EA046: HALT ;GPR ADDRESSING PROBLEM 
ot 003232 000753 BR B1046 ;LOCK ON HARD ERROR 

4 

1915 003234 020627 001000 A046: CMP SP, #STACK :D1D R6 GET DISTURBED 
ay 003240 001402 BEQ BASIC ;BR IF NOT 
1918 003242 000000 £2046: HALT 7R6 ADDRESS PROBLEM 
1919 003244 000746 BR B1046 ;LOCK ON HARD ERROR 





n 3 
CQKDA-D KD11-K BASIC LO MACY11 30A(1052) 11-SEP-79 13:53 PAGE 40 
CQKDAD.P11 11-SEP-79 B1046 GPR ADDRESS INTERRACTION TEST SEQ 0039 


eee eee bette totattion atk © a eo 
/ / ¢ ¢ 7¢ JF BASIC INSTRUCTION TESTS / / / / Jf fF 
TOU 00000 II AKITA IAAI 


003246 005037 7 BASIC: a@#ONCE ;SIGNAL PROGRAM HEADER TO BE PRINTED 
CL O#SERTIL ;CLEAR ERROR COUNT FIRST TIME THROUGH 
aa#$SPASS ;CLEAR PASS COUNT FIRST TIME THROUGH 
063236 INIT: #WPRIFLG,RI ;SET UP TO INIT. COUNTERS AND FLAGS 
1$: ) ;CLEAR ONE WORD 
063254 HY : CLEARED 7 FLAGS AND COUNTERS? 


NO 
001000 STACK ,SP ;SET UP THE STACK POINTER 
004030 177770 #4030,a#UBREAK ;SET SCOPE SYNC FOR COND CODE OPERATE 
003310 177777 =001074 #-1,a#SREGS :FLAG CURRENT STACK POINTER TO BE TYPED 
7 1N FIRST ERROR CALL 


3 ,eererereerererererereeeretererereteterenaeetaneeenenaeeneteneee 
*TEST 0 BASIC BNE’ TEST WITH Z=0 
seeeeererererrertererererereneeteeeterekeneneeeteeneneeettereeee 
003316 1810: 
003316 012700 000000 MOV #0,R0 ;;LOAD RO WITH TEST NUMBER 
003322 000257 1$: CCC :MAKE 2=0 


003324 2$: 
003324 001002 BNE TST1 ;:TEST THE BNE = IT SHOULD BR 


003326 000000 3$: HALT ;BNE FAILED TO LOAD PC 
003330 000774 BR 1$ ;LOCK ON HARD ERROR 


se eeereriarereerrreeerreteeerreeeeteteneeeeeeeeeeeeeAeeeAes eHeEe 
TeTEST 1 BASIC "'BNE’ TEST WITH Z=1 
Leceeteereteeererettetereerereetrerteretenreerereetereereerenees 

003332 ist1: 

003332 012700 000001 #1,R0 ::LOAD RO WITH TEST NUMBER 

003336 000264 1$: l :SET THE "2" BIT 


003340 001001 2$: ; TEST THE BNE - IT SHOULD NOT BR 


003342 000402 ;:G0 TO NEXT TEST 


003344 000000 3$: ;BNE BRANCHED WITH 2=1 
003346 000773 ; ;LOCK ON HARD ERROR 


so eerrerererereerererrereereerereeereeereeaAeeeeeeereseeeeeTeeese 


s*TEST 2 BASIC ‘‘BEQ’’ TEST WITH 2=1 
ppeteerererereeerserrertreeeertrreereeeteneeeeeee eee Kee KEES 
003350 TST2: 
003350 012700 000002 MOV #2,R0 :;LOAD RO WITH TEST NUMBER 
003354 000264 1$: SEZ sMAKE Z=1 


003356 2$: 
003356 001402 BEQ TST3 ;:; TEST THE BEQ = IT SHOULD BR 


003360 000000 3$: HALT ;BEC FAILED TO LOAD THE PC 
003362 000774 BR 1$ ;LOCK ON HARD ERROR 


speerecererereeesesereceresessesereneceeeeeaeaeeanaeeeeeneseeeeeTe 





0G 
9 


012700 000003 
000257 
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1976 
1977 
1978 003364 
1979 003364 
1980 003370 
1981 
1982 005372 001401 
1983 
1984 003374 000402 
1985 
1986 003376 000000 
1987 003400 000773 
1988 
1989 
1990 
1991 
1992 003402 
1993 003402 012700 
1994 003406 005037 
1995 003412 000270 
1996 
1997 003414 100001 
1998 
1999 003416 000402 
2000 
2001 003420 000000 
2002 003422 000771 
2003 
2004 
2005 
2006 
2007 003424 
2008 003424 012700 
2009 003430 005037 
2010 003434 000257 
2011 
2012 003436 
20135 003436 100002 
2014 
2015 003440 000000 
2016 003442 000772 
2017 
2018 
2019 
2020 
2021 003444 
2022 003444 012700 
2023 003450 012705 
2024 003454 00501 
2025 003456 005005 
2026 003460 000277 
2027 
2028 003462 011503 
2029 
2030 003464 020527 
2031 003470 001402 


000004 
177776 


000005 
177776 


000006 
177776 


000017 
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5? 
13 BASIC “‘BEQ’’ TEST wiTH 2=0 SEQ 0040 
s*TEST 3 BASIC ‘‘BEQ’’ TEST wiTH 2-0 
“@eeeeeeterereeeeeeeseeerererereereeeeeereeterterteaeeee kere eeteeeeeere 
1813: 
MOV #3,R0 :;LOAD RO WITH TEST NUMBER 
1$: ccc ;MAKE 2=0 
2s: BEQ %§% ; TEST THE BEQ - IT SHOULD NOT BR 
BR TST4 3;G0 TO NEXT TEST 
3$: HALT ;BEQ BRANCHED WITH 2=0 
BR 1$ sLOCK ON HARD ERROR 
ee ee ee ne ee 
stTEST 4 BASIC ‘'BPL’’ TEST WITH N=1 
° peeeereeereererereeeeeeerringkretereeeeeeeeeteneteneeteeeeeetenee 
TST4: 
MOV #4,R0 :;LOAD RO WITH TEST NUMBER 
1$: CLR aaPSw sCLEAR THE PSW 
SEN sMAKE N=1 
2$: BPL 3$ ;TEST THE BPL - IT SHOULDN'T BR 
BR TST5 3:60 TO NEXT TEST 
3$: HALT :BPL BRANCHED WITH N=1 
BR 1$ ;LOCK ON HARD ERROR 
sy eeeerererererenereerereeeeneeereeteneeetataneneeataranereeeeeest 
s*TEST 5 BASIC ‘‘BPL'’ TEST WITH N=0 
pperteerareretereeeeretetrereteteterereeeteineeeeeeanetetereteeess 
TSTS: 
MOV #5,R0 :;LOAD RO WITH TEST NUMBER 
1$: CLR aePrSw s;CLEAR THE PSW 
CCC ;SCOPE SYNC 
2$: 
BPL TST6 3; TEST THE BPL - IT SHOULD BR 
5$: HALT :BPL FAILED TO LOAD THE PC 
BR 1% ;LOCK ON HARD ERROR 
sy eeerereerrerererererererererererereeetAneteneereeeeKeneeeneneeee 
s*TEST 6 BASIC ‘MOV (RA),RB' TEST = (RA)=177776 
si eeereeerrerreesereerererereerereneeneeneeAeeeeaseeneeseeneneees 
TST6: 
MOV #6,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #PSW,RS ;SOURCE ADDR = 177776 
1$: CLR (R5) sMAKE CPSWJ=000 
CLR R3 ;CDESTJ] = 000000 
$cc sMAKE CPSWJ=017 
2$: MOV (R5),R3 : TEST THE MOV 
CMP R3,#17 sCORRECT RESULT ? 
BEQ TS17 > BR IF YES 


CQKDA-D + eee eit 
CQKDAD.P11 


003472 
003474 


003476 
003476 


003520 
003522 
003524 


003526 
003530 


003532 


003552 
003554 
003556 


003560 
003562 


003564 


003576 
0903600 
003604 


003606 
003610 


003612 
003614 


003616 
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000000 
000767 


001402 


000000 
000770 


020412 
001002 


000000 
000771 


022703 
001402 


000000 
000771 


020403 
001402 


000000 


0oo 


00001 
06331 
00000 
06331 


m—NoO 


000011 
125252 


125252 


063312 
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BASIC ‘MOV T 


- (RA)=177776 


3$: HALT ;ERROR-MOV FAILED 
BR 1$ LOCK ON HARD ERROR 

seeeeerrertereerereerereceeeeetereeeererteeneeettereeeeeeeereeee 

TaTEST 7 BASIC "CMP RA,(RB)'’ TEST = CRA) = CDESTI 


- eeeerererererreererereererererererereetereteeererererererertete 


i817: 


MOV #7,R 3;LOAD RO WITH TEST NUMBER 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #125252 ,R4 sRESULT S / B = 125252 
1$: MOV #125252,a#MBUFO ;MAKE CDEST] = 125252 

CCC sMAKE N:C=0000 
2s: CMP R4,(R2) sTEST THE CMP 

BEQ 18110 ::BR IF ‘'2"' GOT SET 
3$: HALT sERROR - CMP FAILED TO SET ‘2 

BR 1% s;LOCK ON HARD ERROR 
ppeerereerrrrereereeeeerereeeeeeenetrrereereneAAAAAAeAAATEAAeeeeS 
s*TEST 10 BASIC "CMP RA,(RB)'' TEST = CRA] NOT EQUAL TO [DEST] 
sp eeeeeererrerereeeerrrereeerenereteneereneeKAneeeARAeeneneeereNee 
TST10% 

MOV #10,R0 sLOAD RO WITH Mi NUMBER 

MOV #MBUFO,R2 “DEST os s 2 FO 

MOV #1,R4 sRESULT S 000001 
1$: CLR a*MBUF O > MAKE teest) © “000000 

SEZ sMAKE N:C= 0100 
2s: CMP R4,(R2) sTEST THE CMP 

BNE TST11 3:BR IF “'2°* GOT CLEARED 
3$: HALT sERROR - CMP FAILED TO CLR ‘'7"' 

BR 1$ s;LOCK ON HARD ERROR 
speeeerrererrreeerererererererereerrereAeAAArAeAAe AAR eeeEKeeeAT Te 

s@TEST 11 BASIC ‘'CMP #N,R'' TEST - N = CRI 


*“@eeeeeeteeeeeeeeeeeeeereeeeeeteeetereeeeteeteteeteneeeeeeeeeeeeeene 


7$111: 


MOV #11,R0 >;LOAD RO WITH TEST NUMBER 
MOV #125252 ,R4 sRESULT S / B = 125252 
1$: MOV R4,R3 sCDESTJ] = 125252 
CCC ;SCOPE SYNC 
2$: CMP #125252,R3 3s; TEST THE CMP 
BEQ 4% ;BR IF N = CR) 
3$: HALT sCMP FAILED 
BR 1$ sLOCK ON HARD ERROR 
4$: CMP R4,R3 :D1D CMP ALTER CDESTJ? 
BEQ TST12 >: BR 1F NO 
5$: HALT ;CMP DELIVERED A RESULT 


2 
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2088 003620 000765 
2089 


003622 
012700 000012 
005004 


010403 
000264 


022703 
001002 


000000 
000771 


020403 
001402 


000000 
000765 


003634 
2101 003640 


003642 
003644 


003646 
003650 


003652 
003654 


000001 


003656 


003674 
003676 


003700 
003702 


003704 
003706 
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020412 
001402 


000000 
000771 


003710 
003710 0 
003714 0 
003720 0 
003724 0 
003726 


00375¢ 


003734 
003736 
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111 BASIC "'CMP #N,R'' TEST - N = 


BR 1$ ;LOCK ON HARD ERROR 


-s@@rtretereterereretereeeerreretererereretetereteteeteteeeeereereres 


S*TEST 12 BASIC ‘CMP #N,R'' TEST = N NOT EQUAL TO [RJ 


;,eeeeeeerrerereeeeereeeeerereeereeeteteeteeeeeerenteeeeeteereAeese 


TST12: 


PAGE 43 
CR] 


MOV #12,R0 ;;LOAD RO WITH TEST NUMBER 
CLR RG ;RESULT S / B = 000000 
1$: MOV R4,R3 ;CDESTJ = 125252 


SEZ SCOPE SYNC 


2$: CMP #1,R3 sTEST THE CMP 

BNE 4$ ;BR IF N NOT EQUAL TO [CR] 
3$: HALT ;CMP FAILED 

BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4,R3 :D1D CMP ALTER [DEST]? 


BEQ TS113 ;;BR IF NO 


;CMP DELIVERED A RESULT 
;LOCK ON HARD ERROR 


5$: HALT 
BR 1$ 


py; eeeereeeerererereeetereeeeeereetteereeeeeKetKaeKetteAreReeeete 


S*TEST 13 BASIC "MOV RA,(RB)'' TEST 


;,eeeeerereeeeteneeetrerereerineteeeteetaneeereRenereeeneeeeneeee 


1$113: 


MOV #13,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 ;DEST ADDR=MBUF 0 
MOV #-1,R4 RESULT S / B = 177777 

1$: CLR (R2) ;MAKE CDEST] = 000000 


ccc ;SCOPE SYNC - N:C=0000 


2$ MOV R4,(R2) :TEST THE MOV 

CMP R4,(R2) ;RESULT CORRECT ? 

BEQ TST14 7;BR IF YES 
3$: HALT sERROR - MOV FAILED 

BR 1$ ;LOCK ON HARD ERROR 
ppeeeereeeeerererererereererererererereetetereerteeereneneeeeeeee 
*TEST 14 BASIC ‘MOV #N,(R)*’ TEST 


Spe eewreerereerenrecesererereereeseeserereeeeeeeneeeeeeeteareeeseree 


TST14: 


MOV #14,R0 :;LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #-1,R4 ;RESULT S / B = 177777 
1$: CLR (R2) sMAKE CDEST] = 000000 
CCC ;SCOPE SYNC 
2$: MOV #-1,(R2) :TEST THE MOV 
CMP R4,(R2) sRESULT OK ? 
BEQ 1$115 :;BR IF YES 


SEQ 0042 


























AAAS OS MMMM S 
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003740 
003742 


003744 


003770 
003772 


004000 
004002 


004004 
004906 


004010 


004034 
004036 


004044 
004046 


004050 
004052 


004054 


004070 
004072 


004074 
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004102 
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000000 
000770 


020412 
001402 


000000 
000766 
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020412 
001402 


000000 
000766 


001401 
100002 


000001 
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000017 
065312 
000377 


063312 
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000004 


000005 
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114 BASIC "MOV #N,(R)'’ TEST 


3$: HALT ERROR - MOV FAILED 
BR 1$ ;LOCK ON HAPD ERROR 


;,eereeeereeereereeereeerererringterrerereeeetteeeeeereteeterereeene 


s*TEST 15 BASIC "‘MOVB #N,X(R)"' TEST = DEST EVEN 


sp eeeererererererereeereteeteretereeereteertenekeneeneereeereeeee 


TST15: 


MOV #15,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #177401,R4 ;RESULT S / B = 177401 
MOV #MBUF1,R2 ;DEST ADDR = MBUF 1 
MOV #MBUFO,R5S ;BASE DEST ADDR = MBUFO 
1$: MOV #-1,(R2) :CDEST] = 177777 
CCC ; SCOPE SYNC 
2$: MOVB #1,4(R5) ; TEST THE MOVB 
CMP R4,(R2) ;RESULT OK? 
BEQ TST16 ;:BR IF YES 
3$: HALT ;MOVB DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


sy etereerererererereeertrereteterereeteeneeeeeaeerehenetareretaee 
s*TEST 16 BASIC "'MOVB #N,X(R)"' TEST = DEST ODD 


"meee eeeeterereeeteeeeterreerereereeeeeerereeteeeeeeeeeeeeeeaeeeeeretes 


1ST16: 


MOV #16,R0 :;LOAD RO WITH TEST NUMBER 
MOV #777,R4 sRESULT S / B= 777 
MOV #MBUF1,R2 sDEST ADDR = MBUF 1 
MOV #MBUFO,RS ;BASE DEST ADDR = MBUFO 
1$: MOV #-1,(R2) : (DEST) = 177777 
CCC ;SCOPE SYNC 
2$: MOVB #1,5(R5) sTEST THE MOVB 
CMP R4,(R2) ;RESULT OK? 
BEQ TST17 :;BR IF YES 
3$: HALT :MOVB DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


*s@@eetereeereterreeeeteeterereeeeeereeeeeeeeeeeeeereeeeeeeeeenteteeese 


S*TEST 17 BASIC ‘TST @w#A'' TEST WITH CA) GT 0 


‘s@eeeeereereeteeeeeeetreeteeeeeteereeeeeeeeteeeeeereeeeeeeeeeeeeeeeenese 


S117: 


MOV #17,R0 ;;LOAD RO WITH TEST NUMBER 

MOV #MBUFO,R2 ;DEST ADDR = MBUF 

MOV #377,R4 RESULT S /_ B = 377 (NO CHANGE) 
1$: MOV R4,(R2) :CDEST) = 377 

ccc SCOPE SYNC 
2$: TST a#MBUFO ;TEST THE TST 

BEQ 3$ ;BR IF ‘'2"' SET = 17 SHOULDN'T BE 

BPL 18120 7:BR IF "'N’’ CLEAR = IT SHOULD BE 





SEQ 0043 | 
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MroroMrwror 
Mroroherrer 


004104 
004106 


004110 
004110 
004114 
004120 
004124 
004126 


004130 


004134 
004136 


004140 
004142 
004144 
004146 


004150 
004152 


004154 
004154 
004160 
004164 
004166 
004170 


004172 
004176 


004200 
004202 


004204 
004206 


004210 
004212 


004214 


004224 
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000000 
000770 


001401 
100402 


000000 
000770 
020412 
001402 


000000 
000764 


012700 
005012 
000257 
005737 
001402 


000000 
000771 


020412 
001402 


000000 
000765 
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012702 
012704 


000020 
063312 
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063312 
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063312 


063312 


000022 
063312 
040000 
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117 BASIC ‘TST @a#A"’ TEST WITH CA) GT O SEQ 0044 
3$: HALT ;TST FAILED TO ALTER CODES PROPERLY 

BR 1$ ;LOCK ON HARD ERROR 
sy errererereterertrererererererereereretenereeneraeeneReeeeeeee ee 
s*TEST 20 BASIC ‘TST @#A"' TEST WITH CA) LT 0 
s;eeeeeereeeeerererrererereererereteeeeeetKeneeeeneeteeeeeenetee 
TS120: 

MOV #20,R0 ;;LOAD RO WITH Ui NUMBER 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #100000 ,R4 ;MAKE S / B = 100000 
1$: MOV R4,(R2) MAKE CDEST] = 100000 

CCC ;SCOPE SYNC 


BMI 4$ BR IF ‘'N’’ SET = IT SHOULD BE 
3$: HALT ;TST FAILED TO ALTER CODES PROPERLY 
BR 1$ ;LOCK ON HARD ERROR 
4$ CMP R4,(R2) :D1D TST DISTURB CDEST] ? 
BEQ TST21 ;;BR IF NOT 
5$: HALT ;TST DELIVERED A RESULT 
BR 1$ ;LOCK ON HARD ERROR 
jp oconenveneseseoorooesseserresenseserecunsesenensetnesoesesseses 
:*TEST 21 BASIC ‘TST @#A'' WITH CA) = 0 
weer eeeee eee eeeeeteteeteeeteeeeeeeeeeeeeeeeeeeeee eee eee eee 
1$121: 


MOV #21,R0 ;;LOAD RO WITH TEST NUMBER 

MOV #MBUFO,R2 ;DEST ADDR = MBUF FO 

CLR RG RESULT S / B = 0 (IT SHOULDN'T CHANGE 
1$: CLR (R2) ;CDEST] = 0 

ccc :SCOPE SYNC - 2-0 


2s: TST a#MBUF 0 ; TEST THE TST 
BEQ 4$ ;BR IF TST SET "2" 


3$: HALT ;TST FAILED TO SET ‘'2"" 
BR 1$ ;LOCK ON HARD ERROR 


4$: CMP RG, (R2) ;CDEST] STILL = 000000 
BEQ TST22 ;;BR IF YES 


5$: HALT ;TS1 ALTERED THE CDEST) 
BR 1$ ;LOCK ON HARD ERROR 


 *@eeeeetereeeeeeeeeeteeeeeeeeeeeeeeeeeeeteeeeeeeeeeeeeeteeeeenes 


p*TEST 22 BASIC "'BIT #N,Q#A" WITH BIT SET IN ‘A 


sgeeceeteererecersereeceterrenererereesesersasetesasesseseserenes 


TST22: 
MOV #22,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 


28: TST — a#MBUFO ;TEST THE TST 

BES ;BR IF "'Z'' SET = IT SHOULDN'T BE 

MOv #40000, R4 TRESULT S / B = 60000 | 
| 
} 


- —on . 
ESTS sale tS 1i-SEP-79 13: 53 PAGE 46 | 
1 T22 SEQ 0045 


2303 004340 001402 BEQ 4$ ;BR IF ‘2°’ SET = IT SHOULD BE 


2305 904342 000000 3$: HALT 71ST FAILED TO SET ‘'2" 
2306 004344 000772 BR 1$ ;LOCK ON HARD ERROR 


2308 004346 022702 065514 4$: CMP @MBUFO4+2,R2 7D1D REG. GET AUTO-INCREMENTED ? 
004352 001402 BEQ T$125 7:BR IF YES 


004354 000000 5$: HALT TST FAILED TO UPDATE REGISTER 





CQKDA-D KD11-K BASIC te 1¢ 1 

CQKDAD.P11 11-SEP-79 13:3 SIC "BIT @#N aA" WITH BIT SET IN ‘A’ 
2256 004230 010412 1$: MOV R4,(R2) MAKE CDESTJ = — 
ss2t 004232 000277 $cc ;SCOPE SYNC = Z=1 
$52) 004234 032737 040000 063312 28: BIT #40000,a#MBUFO ;TEST THE BIT 
sce) 004242 001002 BNE T8123 3;BR IF 2=0 - IT SHOULD BE 
2263 004244 000000 3$: HALT ;BIT FAILED TO CLEAR ‘'2"’ 
ssee 004246 000770 BR 1$ ;LOCK ON HARD ERROR 
5366 ppeeeeeeerererterrenrertrereeteeretereteeeeeeeteeeetereereeeteees 
2267 S*TEST 23 BASIC ‘BIT #N,a#A"' WITH BIT CLEAR IN ‘‘A"’ 
2268 Lr eeeneeeereeeeeeeetereeereerrerteetereeeteeeeeeeeetereeererereee 
2269 004250 TS123: 
2270 004250 012700 000023 MOV #23,R0 3;LOAD RO WITH TEST NUMBER 
2271 004254 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
2272 004260 005012 1$: CLR (R2) ;MAKE CDESTJ = 000000 
ph 004262 000257 ccc sSCOPE SYNC - 2=0 
sote 004264 032737 940000 063312 2%: BIT #40000,a#MBUFO ;TEST THE 8I1T 
sore 004272 001402 BEQ 4$ ;BR IF Z=1 - IT SHOULD BE 
2279 004274 000000 3$: HALT ;BIT FAILED TO SET “'2"’ 
ecey 004276 000770 BR 1$ :LOCK ON HARD ERROR 
2282 004300 005712 4$: TST (R2) 3010 BIT DELIVER A RESULT 
iH 004302 001402 BEQ TS124 > BR 1F NOT 

4 
2285 004304 000000 5$: HALT ;BI1T DISTURBED THE CDESTI 
scan 004306 000764 BR 1% ;LOCK ON HARD ERROR 
2288 pete eeeeeeeeeeeeeereeeetereeereeeeeeeeee eee eee Tete tee Eee e ATE TES 
2289 S*TEST 24 BASIC ‘'IST (R)4'' TEST 
2290 ppeteeeeerereeterereeerertereeeere rete Tete Rete eee ere eee 
2291 004310 TST24: 
2292 004310 012700 000024 MOV #24,R0 ;LOAD RO WITH TEST NUMBER 
2293 .SBTTL USER CONTROLLED BREAKPOINI -- BIT0 
2294 004314 032737 000001 063234 BIT WBITO,a#BPTLOC ;BREAKPOINT HALT SET ?? 
2295 004322 001401 BEQ #4 :BR IF NOT 
2296 004324 0600000 HALT ;BREAK = DEPRESS CONTINUE TO RESTART | 
2297 004326 012702 063312 MOV #MBUFO,R2 s INITIAL DEST ADDR = MBUFO 
2298 004332 005012 1$: CLR (R2) ;MAKE [DEST] = 000000 
4 004334 000257 ccc ;SCOPE SYNC 
2301 004336 005722 2$: TS] (R2)+ sTEST THE TST 
| 
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004432 


004434 
004434 
004440 
004444 
004446 
004450 
004452 


004454 


004460 
004462 


004464 
004466 
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000765 
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000000 
000771 


020502 
001402 


000000 
000765 


020412 
001403 
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USER CONTROLLED BREAKPOINT -- BITU 


BR 1$ ;LOCK ON HARD ERROR 


PAGE 47 


sp eeeeeeeeereerrrerionererrerererereretereeeeeenaeeenenereeTeee re 
s*TEST 25 BASIC “TST -(R)" TEST 

ppt eeeeerererereereeretrererterertrrererereneeeeeneeeeeeeneeeeee ee 
TST25: 


MOV #25,R0 ;;LOAD RO WITH TEST NUMBER 


MOV #DWTA+6,R2 sDEST ADDR = DWTA+6 
MOV #377,R4 sRESULT S / B = 377 
1$: MOV #DWTA+10,R5 sBASE DEST ADDR = DwTA+10 
SEN ;SCOPE SYNC 
2s: TST -(R5) sTEST THE TST 
BPL 4% ;BR IF “'N'' CLEAR 
3$: HALT ;TST FAILED TO CLEAR ‘'N" 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R5,R2 :D1D DEST REG GET DECREMENTED? 
BEQ 6$ ;BR IF YES 
5$: HALT sERROR - TST FAILED TO UPDATE DEST REG 
BR 1$ :;LOCK ON HARD ERROR 
6$: CMP R4,(R2) sDID TST ALTER CDESTJ? 
BEQ TS126 :;BR IF NOT 
7$: HALT :TST ALTERED CDEST) 
MOV RG, (R2) sRESTORE CDESTJ 
BR 1$ ;LOCK ON HARD ERROR 


sp eeeeerererererererererterereertreretereeeaeeeAneaReeeeNeTeneees 


s*TEST 26 BASIC "COM @m#A’’ TEST 


-*eeaeeeeeeereteeeeeeeeereeeteteteeeeteeeeeteeeeeeeeeeeeeeeteteene 


1S126: 


MOV #26,R0 ;:LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
CLR RG sRESULT S / B = 177777 
COM R4 
1$: CLR (R2) sMAKE CDEST] = 000000 
CCC ;SCOPE SYNC 
2s: COM a#MBUFO ; TEST THE COM 
CMP RG, (R2) sRESULT = 177777 ?? 
BEQ TS127 3:BR IF YES 
3$: HALT - >COM DELIVERED THE WRONG RESULT 
BR 


sseececcereeoererceseeerserererserereeeeensesesereseeeseesesseeTs 
reTEST 27 BASIC “INC @#@A" TEST 
sseeceeseorecveressceserceeseseeeresnesteenensesaenesereseseeneTs® 
TST2?7: 


MOV #27,R0 3;LOAD RO WITH TEST NUMBER 
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CQKDAD.P11 





004474 
004500 
004504 
004510 


004512 


004516 
004520 


004522 
004524 


004526 
004526 
004532 
004536 


004540 


004542 
004544 


004546 
004550 


004552 
004552 
004556 
004562 
004566 
004570 


004572 


004576 
004600 


004602 
094604 


004606 
004606 
004612 
004616 
004620 
004624 


L 
11-SEP-7 
012702 
012704 
012712 
000257 
005237 


020412 
001402 


000000 
000767 


012700 
012703 
000257 
005303 


005703 
001402 


000000 
000770 


000257 
005337 


020412 
001402 


000000 
000770 


0G 
9 


000030 
000001 


000031 
177777 
063312 


063312 


1 4 
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127 BASIC “INC @M#A" TEST 


MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #100,R4 :RESULT S / B = 100 
1$: MOV #77, (R2) (DEST) = 77 
CCC SCOPE SYNC 
2$: INC a*#mMBur 0 ; TEST THE INC 
CMP RG, (R2) ;D1D RESULT = 100 ?? 
BEQ T$130 7;BR IF YES 
3$: HALT ; INC DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


si eteeerrreererrerererrereerereeerererenetaRneneeeeeeReeneseeeeee 
;*TEST 30 BASIC "DEC RN’ TEST 


sy eeorererererererererrererterenteeteeeeareareneneneneereneeeeeese 


18130: 


MOV #30,R0 ::LOAD RO WITH TEST NUMBER 
1$: MOV #1,R3 stOEST) = +1 
CCC ;SCOPE SYNC 
2s: DEC R3 sTEST THE DEC 
TST R3 sRESULT = 000000 ?? 
BEQ 1S131 :;BR IF YES 
3$: HALT :DEC SELIVERED THE WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


“*s@eeaeeeteeteteeeeeteetetetaeeeeetereeeteeeieteeteneaeeeeeeeeeeeeenenese 


TEST 31 BASIC "DEC awa’ TED! 


‘eee eeeeteketeteeeeeeeteteeeeeeeeeteereeeteteeeeeheeeeeeeeeeeenee 


1$131: 


MOV #31,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #-1,R4 ;RESULT S / B = 177777 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
1$: CLR (R2) MAKE [DEST] = 000000 
ccc ;SCOPE SYNC 
2$: DEC a*#MBUFO ; TEST THE DEC 
CMP R4,(R2) :D1D RESULT = 177777 ?? 
BEQ TS132 3:BR IF YES 
3$: HALT ;DEC DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


‘@eeeereteere retreats eee eeeeeeteeeeenereeeeeeeteeeneese 


TeTEST 32 BASIC "’CLR X(R)"* TESTS 


*s@eereetereteetekreteeetertereeeeteeeeeeeteeeeeneeteeeteeeeeeetene 


15132: 


MOV #32,R0 7;LOAD RO WITH TEST NUMBER 
MOV #MBUFO42,R2 ;DEST ADDR = Be Q+2 
CLR RG sRESULT S / 000000 

1$: MOV #MBUFO,RS BASE DEST DOR = MBUFO 


MOV #-1,(R2) sCDESTJ] = 177777 


SEQ 0047 


| ee SL A ake LE LTE 


004630 000257 ccc SCOPE SYNC 
004632 005065 000002 : CLR 2(R5) ;TEST THE CLR 


004636 020412 CMP R4,(R2) ;RESULT = 0? 
004640 001402 BEQ TST33 :;BR IF YES 


4 cao 
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CQKDAD.P11 = 11-SEP=79 13:31 BASIC “CLR X(R)'* TESTS SEQ 0048 
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004642 
004644 


004646 
004646 
004652 
004656 


004660 
004662 


004664 
004666 


004670 
004674 


004676 
004700 


004702 
004702 
004706 
004712 


004714 
004716 


004720 
004722 


004724 
004730 


004732 
004734 


004736 
004736 
004742 
004746 


004750 
004752 


11-SEP- 


000000 
000765 


012700 
012703 
000257 
006303 
103402 


000000 
000771 


022703 
001402 


000000 
000764 


012700 
012703 
000261 
006303 
103002 


000000 
000771 


022703 
001402 


0000°0 
000764 


012700 
012703 
000257 
006103 


103402 


0G! 
79 1 


1¢ TESTS 
13:31 


000 
125 


No 
Ww 
row 


052524 


000034 
052525 


125252 


000035 
125252 


K 4 
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132 BASIC “'CLR X(R)"’ TESTS 


3$: HALT 3CLR FAILED TO ZERO CDESTJ 

BR 1$ ;LOCK ON HARD ERROR. 
ppeeeeeeeeeeererreeeeeererereereeeeeeeeeeeeeeneeeeeeenereeeeees 
s*TEST 33 BASIC “ASL RN’ TEST WITH CDESTJ=125252 AND C(0) 


sp etereeeeeeeeearetereeterereeeeeeteteereteeneneeneteeteeneteeene 


18133: 


MOV #33,R0 ;LOAD RO WITH TEST NUMBER 

1$: MOV #125252,R3 MAKE CDEST] = 125252 
ccc ;MAKE C=0 

2$: ASL R3 ;TEST THE ASL = IT SHOULD SET ‘'C’’ 
BCS 4$ ;BR IF ‘'C'’ GOT SET 

3$: HALT sASL FAILED TO SET ‘'C’’ BIT 
BR 1$ ;LOCK ON HRD ERROR 

4$: CMP #52524,R3 sWAS RESULT = 52524 ?? 
BEQ TS134 :;BR IF YES 

5$: HALT ASL DELIVERED THE WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


sy eteeeerererereeeeretereeeetetererereeeneKeeKeekeneeeReeeeterene 


s*TEST 34 BASIC "ASL RN’’ TEST WITH CDESTJ=052525 AND C(1) 


Sp eeeetereeeeeereeeereereetereeeteeeeeteeeeReAeKeKeeeeenteereeeeee 


T8134: 


MOV #34 ,R0 ;LOAD RO WITH TEST NUMBER 
1$: MOV #052525,R3 : MAKE peels 052525 
SEC MAKE C=1 
2$: ASL R3 sTEST THE ASL = IT SHOULD CLR “'C"’ 
BCC 4% sBR IF ‘'C’’ GOT CLEARED 
3$: HALT sASL FAILED TO CLEAR ‘'C’’ 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP #125252,R3 skESULT = 125252 ?? 
BEQ T$135 :,BR IF YES 
5$: HALT sASL DELIVERED WRONG REUL? 
BR 1$ ;LOCK CN HARD ERROR 
pp etteecereererecrrererrereterteeerereeeeenAeneeeeeeeeeeeAereeeese 
s*TEST 35 BASIC "'ROL RN’ TEST WITH CDESTJ=125252 AND C(0) 


sp eeerereerereerreserreerrererereseereeereatererereereseseeeteeese 


18135: 


MOV #35,R0 ;LOAD RO WITH TEST NUMBER 
1$: MOV #125252,R3 WAKE CDEST] = 125252 
ccc MAKE (=0 
2$: ROL R3 :TEST THE ROL = IT SHOULD SET C 


BCS 4¢ ;BR IF ‘'C’’ GOT SET 


SEQ 0049 
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COKDAD.P11 «11-SEP-79 13:31 135 BASIC ROL RN’ TEST WITH CDESTJ=125252 AND C(O) SEQ 0050 
2487 004754 000000 3$: HALT :ROL FAILED TO SET ‘‘C’’ 
2488 004756 000771 BR 1$ “LOCK ON HARD ERROR 
2490 004760 022703 052524 4$: CMP #052524,R3 RESULT = = 952524 2? 
2491 004764 001402 BEQ 1$136 ::BR IF 
2493 004766 000000 5$: HALT ROL DELIVERED WRONG RESULT 
2494 004770 000764 BR 1$ “LOCK ON HARD ERROR 
2496 pp eeetererererrerrentrerererereteeeterteeeeeeaeReeeeeateReteeeenee 
2497 SeTEST 36 BASIC ROL RN’ TEST WITH CDESTJ=052524 AND C(1) 
2498 'WVMEOBRERBRABEBRABBRBBSABAREBSRARARALABRRRASZAERRARARAAESZASAEAAEEERERER RRR RRA R ESE SO 
2499 004772 18136: 
2500 004772 012700 000036 MoV #36,R0 :LOAD RO WITH TEST NUMBER 
2501 004776 012703 052524 1$: MOV #052524,R3 BAKE (DEST) = 052524 
2502 005002 000261 SEC MAKE C=1 
2504 005004 006103 2$: ROL R3 :TEST THE ROL = IT SHOULD CLEAR C | 
2506 005006 103002 BCC 4$ :BR IF "'C'' IS CLEAR 
2508 005010 000000 3$: HALT :ROL FAILED TO CLEAR ‘'C"* 
2509 005012 000771 BR 1$ “LOCK ON HARD ERROR 
2511 005014 022703 125251 4$: CMP #125251,R3 SRESULT = 125251 2? 
2512 005020 001402 BEQ 1$137 ::BR IF YES 
2514 005022 000000 5$: HALT :ROL DELIVERED WRONG RESULT 
2515 005024 000764 BR 1$ “LOCK ON HARD ERROR 
S218 pp eeteeeererereeereereteteeeeesereteteterenetataeeeeneeeneereneees 
2518 SeTEST 37 BASIS “TSTB (R)'' TEST = EVEN ADDRESS 
2519 pp eeeaerereereterererereeetetereteeererererateeeKeKeeeeteeKeneeeese 
2520 005026 18137: 
2521 005026 012700 000037 mov #37,R0 ;:LOAD RO WITH TEST NUMBER 
2522 005032 012702 063330 MOV #DWTA+6,R2 “DEST ADDR = DWIA%6 
2523 005036 012704 000377 MOV #377,R4 “RESULT $ / B = 377 
2524 005042 000257 1$: CCC “SCOPE SYNC 
2506 005044 105712 2$: TSTB (2) :TEST THE TSTB 
2528 005046 100402 BMI 4$ :BR IF "'N'' SET - IT SHOULD BE 
2530 005050 000000 3$: HALT :TSTB FAILED TO SET "'N' 
2551 005052 000773 BR 1$ “LOCK ON HARD ERROR 
2533 005054 020412 4$: CMP RG, (R2) :D1D 1S1B DISTURB (DEST) 
2554 005056 001403 BEQ $140 :;BR IF NOT 
2536 005060 000000 5$: HALT :TSTB ALTERED CDESTJ 
2537 005062 010412 MOV RG, (R2) “RESTORE (DEST) 
2538 005064 000766 BR 1$ “LOCK ON HARD EROR 
2539 sp eeeeeeeeecrereresereererrererrseeeresereeeeneeeAneeeeeeesenesere 
2540 *TEST 40 BASIS "'TSTB (R)"' TEST = ODD ADDRESS 
2541 ss eeeecoereccececeresreceseeereeeeseeeeeeneseeeaeeeeeeseeeeneseeesS 


2542 005066 TST40: 


CQKDA-D KD11-K BA 
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005106 
005110 
005112 


005114 
005116 


005120 
005122 


005124 


005126 
005130 


005132 


005146 
005150 
005154 


005156 
005160 


005162 
005104 


005166 
005170 
005172 


005174 
005174 
005200 
005204 
005210 


005212 
005216 


We 


100402 


000000 
000773 


020412 
001403 


000000 
010412 
000766 


000000 
000772 


020412 
001403 


000000 
010412 
000765 


000041 
063326 
177400 


063326 


000042 
063330 
000377 


063331 


A 
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140 BASIS "‘TSTB (R)"’ TEST = ODD ADDRESS 


MOV #40,R0 

MOV #DWTB+6,R2 
MOV #177401,R4 
MOV #DWTB+7,R3 


;;LOAD RO WITH TEST NUMBER 
;DEST ADDR = DWIB+6 
;RESULT S / B = 177401 
DEST ADDR USED = DWIB+7 


1$: ccc ;SCOPE SYNC 
2$: TSTB (R3) ; TEST THE TSTB 
BM] 4$ ;BR IF "'N’’ SET = IT SHOULD BE 
3$: HALT ;TSTB FAILED TO SET ‘'N’’ 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4,(R2) ;D1D TSTB DISTURB CDESTJ 
BEQ TS141 :;BR IF NOT 
5$: HALT ;1STB ALTERED CDESTJ 
MOV R4,(R2) sRESTORE CDESTJ 


BR 1$ ;LOCK ON HARD EROR 


sp eeeeeerereeeeeeeetererreeereeeeeeeteeetereeeReeeKeRteeererereee 


s*TEST 41 BASIC "'TSTB @#A'’ TEST - EVEN ADDRESS 


Py ereeereeeerererrertrerereeteeeeeettereeekeeeKKkeeKeKeteeteeeeee 


TST41: 


MOV #41,R0 ;;LOAD RO WITH So NUMBER 
MOV MDWTA+4 ,R2 ;DEST ADDR = DWTA 
MOV #177400,R4 RESULT S / B = 177400 
1$: ccc :SCOPE SYNC 
2$: TSTB aADWTA+4 ; TEST THE TSTB 
BEQ 4% ;BR IF "'2'* SET = IT SHOULD BE 
3$: HALT ;TSTB FAILED TO SET *'2" 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP R4,(R2) ;D1D TSTB DISTURB CDESTJ? 
BEQ TST42 ::BR 1F NOT 
5$: HALT ;TSTB ALTERED CDESTJ 
MOV R4,(R2) ;RESTORE CDESTJ 
BR 1$ ;LOCK ON HARD ERROR 
se eeeeerereerererrerererreeeerereteeteeereneeeneeeeeeneeeeeRee eS 
s*TEST 42 BASIC ‘‘TSTB a#A"’ TEST = UDD ADDRESS 


-eeeeeeeeeeeeteeeeeteteeeereKereeeeeeeeeee eee eeeeeeeeeN eee Eee 
18142: 
MOV #42,R0 ;;LOAD RO vk 4 ed NUMBER 
MOV #DWTA+6,R2 ;DEST ADDR = A+6 


MOV #377,R4 sRESULT S / *y "39 
1$: ccc :SCOPE SYNC 
2$: TS1B QsDWTA+7 ; TEST THE TSTB 
BEQ 4$ ;BR IF "2" SET = IT SHOULD BE 


SEQ 0051 





4 
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CQKDAD.P11 11-SEP-79 13:31 T42 BASIC "‘TSTB a#A"’ TEST = ODD ADDRESS SEQ 0052 
2599 005220 000000 3$: HALT ;TSTB FAILED TO SET "2" 
<—- 005222 000772 BR 1$ ;LOCK ON HARD ERROR 
2602 005224 020412 4$: CMP R4,(R2) :D1D TSTB DISTURB (DEST)? 
ots 005226 001403 BEQ T$143 :;BR IF NOT 
2605 005230 000000 5$: HALT ;TSTB ALTERED CDEST) 
2606 005232 010412 MOV R4,(R2) RESTORE CDESTI 
ed 005234 000765 BR 1$ ;LOCK ON HARD ERROR 
2609 ppteeeereeereerereeerererrererreereeereneeKeeeteKeeeeeeeeeeTeTeee 
2610 2 *TEST 43 BASIC "‘DECB 1(SP)"’ 
2611 eee REET EERE TATE AAAAAAAeKeee Kee Tee 
2612 005236 18143: 
2613 005236 012700 000043 MOV #43,R0 7;LOAD RO WITH TEST NUMBER 
2614 005242 01060 MOV SP,R5 ;SAVE SP 
2615 005244 012704 177400 MOV #177400,R4 ;RESULT S / B = 177400 
2616 005250 010506 1$: MOV 5,SP 
2617 005252 005046 CLR -(SP) :CDESTJ = 000000 
sos 005254 000257 ccc ; SCOPE SYNC 
soot 005256 105366 000001 23: DECB 1(SP) ; TEST THE DECB 
2622 005262 020416 CMP R4, (SP) RESULT = 177400? 
cee? 005264 001402 BEQ 4$ :BR IF YES 
2625 005266 000000 3$: HALT sERROR - DECB FAILED 
cece 005270 000767 BR 1$ ;LOCK ON HARD ERROR 
soc8 005272 010506 4$: MOV R5,SP ;RESET THE SP 
$630 ppteeeeeerereeerereerererrertrrereerrrerereeeeeeeeeereeee eee 
2631 s*TEST 44 BASIC ‘MOV O#A,R"' TEST 
2632 pp eeeeerretererererererererererrrerererrereReee KEKE R ELLE 
2633 005274 TST44: 
2634 005274 012700 000044 MOV #44,R0 ;;LOAD RO WITH TEST NUMBER 
2635 005300 005003 1$: CLR R3 :CDEST] = 000000 
s026 005302 000257 ccc ; SCOPE SYNC 
os 005304 013703 063276 2$: MOV O#ATA,RS ;TEST THE MOV 
6 
2640 005310 022703 063322 CMP #OWTA,R3S RESULT = DWTA? 
* 005314 001402 BEQ TS145 ::BR IF YES 
4 
2643 005316 000000 3$: HALT ;MOV FAILED TO DELIVER CORRECT RESULT 
2644 005320 000767 BR 1$ ;LOCK ON HARD ERROR 
_ ppeeeeeteeeerreerereeereerertrretrettrteeeeeeeeeR eRe RA TATE Eee 
2647 s*TEST 45 BASIC ‘MOv #N,X(R)'’ TEST 
2648 eRe eee eee eee eee eee eee eee eee eee ee eeeeeeeeeeeAeeeeteeer eee 
2649 005322 18145: 
2650 005322 012700 000045 MOV #45,R0 ;;LOAD RO WITH Mi + NUMBER 
2651 005326 012702 063314 MOV #MBUFO+2,R2 :DEST ADDR = MBUFO+2 
2652 005332 012704 125252 MOV #125252,R4 sRESULT S / B = 1125952 
2653 005336 012703 063312 1$: MOV #MBUFO,RS 7CR3)] = BASE DEST ADDR 
2654 005342 005012 CLR (R2) (DEST) = 000000 
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005 344 
005 346 


005354 
005356 


005 360 
005 362 


005364 
005364 


005402 
005404 


005410 
005412 


005414 
005416 


005420 
005420 
005424 
005430 
005432 


005434 


005436 
005442 


005444 
005446 


005450 
005454 


005456 
005460 


005462 
005462 
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020412 
001402 


000000 
000765 


020413 
001402 


000000 
000770 


012700 
012705 
005003 
000257 


012503 


022703 
000402 


000000 
000766 


022705 
001402 


000000 
000761 


012700 
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125252 000002 


000046 
063312 
125252 


125252 


000047 
063276 


063322 


067300 


000050 


5 
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145 BASIC ‘MOV @N,K(R)” TEST 


ccc ;SCOPE SYNC 
23: MOV #125252,2(R3) sTEST THE MOV 
CMP R4,(R2) sRESULT OK? 
BEQ TS146 7:BR IF YES 
3$: HALT ;MOV DELIVERED WRONG RESULT 
BR 1$ :LOCK ON HARD ERROR 


feet obey eterna bt aga ac le 


:*TEST 46 BASIC “MOV #N,(R)"’ TEST 


4  eeeereeeereereererrerereeereretcereeteeeeererereseeerereererret 


T5146: 


MOV #46,R0 3;LOAD RO WITH vty NUMBER 
MOV #MBUFO,R3 sDEST ADDR = oe FO 
MOV #125252 ,R4 ;RESULT ° / B = 125252 
1$: CLR (R3) :(DEST) = 000000 
ccc ;SCOPE SYNC 
2$: MOV #125252, (R3) ; TEST THE MOV 
CMP R4,(R3) sRESULT OK? 
BEQ 1S147 :;BR IF YES 
3$: HALT sMOV DELIVERED WRONG RESULT 
BR 1$ sLOCK ON HARD ERROR 


ppeteareererrerrereerereterterentererreneneeneeneneeneerereneTeee 


s*TEST 47 BASIC "MOV (RA)+,RB" TEST 


;;eeeerererererereeeerrererrreerteterteeeeeKeneeeeeeeeneteneneeese 


TST47: 


MOV #47,R0 ;;LOAD RO WITH TEST NUMBER 
1$: MOV MATA,RS ;SRC ADDR = ATA 
CLR R3 ;CDESTJ] = 000000 
ccc ;SCOPE SYNC 
2$: MOV (R5)+,R3 ;TEST THE MOV 
CMP #DWTA,R3 sRESULT OK? 
BR 4$ ;BR IF YES 
3$: HALT ;MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP MATA+2,R5 ;D1D SRC REG GET INCREMENTED? 
BEQ TS150 ;;BR IF YES 
5$: HALT ;MOV FAILED TO UPDATE SRC. REG. 
BR 1$ ;LOCK ON HARD ERROR 
sseeeerererreorreesereresererererereresereseeseeeesesenseseraeeees 
;*TEST 50 BASIC "MOV @#A,aaB" 


*@eaereeeeteteeeeeteeetereteeeeeeeteeeeteeeeeeneeeeteeteeeeeeeeese 


18150: 
MOV #50,R0 ;;LOAD RO WITH TEST NUMBER 


SEQ 0053 


war ey 
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SN NN NN NN NN NN NSN NN NS ON SSNS SSS 


AWA ANIWAIAI RS PO PPP POPP  * es 
WEWN "OO COON YS WN —OOOnCUVIFWN— 


SSN NNN 
PE wnww 


PEP PMP NPP NPP PPP PUPP PEPO PEP POPE Po fone enone fnonrry 
{SSeS 


“N 
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005502 
005510 
005512 


005514 
005516 


005520 


005530 
005532 


005536 
005540 


005542 


005544 


005562 
005564 


005570 
005572 


005574 
005576 


005600 
005600 
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005610 
005612 


005614 
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013737 
020412 
001402 


000000 
000767 


012700 
012705 
000257 


016507 


000000 
000771 


005544 


012700 
012704 
012702 
005012 
000257 


013712 


020412 
001402 


000000 
000770 


065276 


000051 
005532 


000010 


000052 
063322 
063312 


063276 


000053 
063276 


000004 


063316 
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"Ov a#A,asB" SEQ 0054 
MOV #MBUFT,R2 DEST ADDR = BUF I 
Mov #DWTA,RS *RESULT $ / B = 
1$: CLR (R2) MAKE lpest’ 000000 
CCC =SCOPE SYNC 
2: MOV asATA QsMBUF1 = TEST THE MOV 
CMP RG, (R2) “DID RESULT = #DWIA ? 
BEQ 1S151 ::BR IF YES 
3$: HALT sMOV DELIVERED THE WRONG RESULT 
BR 1$ [LOCK ON HARD ERROR 
Te TT eT wee 
SeTEST 51 BASIC "MOV X(R),PC' TEST 
**@enreereeeeeeeeaeee eee eereeee eee eerereereeaeeaaeekaenkenaenkaeeteneeeeeeeneee ee 
1$151: 
MOV #51,R0 ::LOAD RO WITH TEST NUMBER 
1$: MOV #2$,R5 :(R5] = 2% (BASE ADDRESS) 
CCC :SCOPE SYNC 
2$: MOV 4$-2$(R5),PC  ; TEST THE MOV - GO TO NEXT TEST VIA 4$ 
38: HALT :MOV FAILED TO LOAD THE PC 
BR 1$ [LOCK ON HARD ERROR 
4$: +2 :POINTER TO NEXT TEST 
Sp ereeeererererererereeerererererenenetanetanerenatenenenerenenes 
TeTEST 52 BASIC ‘MOV @#A,(R)" TEST 
sy ereeeereereeeeeeerererereetereterererenenatenetenetenenenenenese 
TSTS2: 
MOV #52,R0 ::LOAD RO WITH TEST NUMBER 
MOV #DWTA,RG =RESULT S / B = #DWTA 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
1$: CLR (R2) :MAKE (DESTJ=000000 
CCC :SCOPE SYNC - 2=0 
2$: MOV QWATA, (R2) :TEST THE MOV 
CMP R4, (R2) :DID RESULT = #DWIA ?? 
BEQ 1S153 ::BR IF YES 
3$: HALT :MOV DELIVERED WRONG RESULT 
BR 1$ “LOCK ON HARD ERROR 
si eeeeerererererseerererererereseeteetereneseeeeAeteateseeeesenes 
SeTEST 53 BASIC "MOV X(RA),RB'’ TEST 
si eeeneeeerrerererrererererereereseeeenerAreeeeeeaeeeteeeeessaees 
18153: 
MOV #53,R0 “LOAD RO WITH TEST NUMBER 
MOV #ATA,RS ‘ERS) = BASE ADDR FOR SOURCE .ATA) 
I$: CLR R3 “MAKE [DEST] = 000000 
CCC “SCOPE SYNC 
2$: MOV 4(R5),R3 :TEST THE MOV 


Dd 5 
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CQKDAD.P11 11-SEP-79 13:31 153 BASIC ‘MOV X(RA),RB TEST SEQ 0055 
2767 005620 022703 064630 CMP #DBTA,P3 ;RESULT = #DBTA 7? 
ores 005624 001402 BEQ TST54 7;BR IF YES 
2770 005626 000000 3$: HALT ;MOV DELIVERED WRONG RESULT 
git 005630 000767 BR 1$ ;LOCK ON HARD ERROR 
5773 ppeteeeeeererererrerererererrererrereerereneneeeerereteerereeeeee 
2774 s*TEST 54 BASIC ‘MOV RA,-(RB)"* TEST 
2775 ppeeeeeererrrreerrereeeeereterererereerereeeeeeeeeteereeeetete Tee 
2776 005632 TS154: 
2777 005632 012700 000054 MOV #54,R0 :;LOAD RO WITH TEST NUMBER 
2778 005636 012702 063312 MOV #MBUFO,R2 ;FINAL DEST ADDR = MBUFO 
2779 +005642 012704 125252 MOV #125252,R4 RESULT $/B= 125252 
2780 005646 012705 063314 1$: MOV #MBUFO+2,R5 s INITIAL DEST ADDR = TEMP2 + 2 
2781 005652 005012 CLR (R2) > MAKE (DEST) = 000000 
ort 005654 000257 ccc ;SCOPE SYNC 
sree 005656 010445 2$: MOV R4,-(R5) s;TEST THE MOV 
2786 005660 020412 CMP R4,(R2) sRESULT = 125252 
sree 005662 001402 BEQ 4% ;BR IF YES 
2789 005664 000000 3$: HALT :MOV DELIVERED THE WRONG ESULT 
si 005666 000767 BR 1$ ;LOCK ON HARD ERROR 
2792 005670 020205 4$: CMP R2,R5 ;D1D REGISTER GET DECREMENTED ? 
i844 005672 001402 BEQ T$155 ::BR IF YES 
2795 005674 000000 5$: HALT ;MOV FAILED TO UPDATE REGISTER 
se 005676 000763 BR 1$ ;LOCK ON HARD ERROR 
2798 3 | SooSKeCERSSeRSeSoETeVeseHeeHeeeNeaTOReoNASSTENNsAETSERSTeONTNes 
2799 *TEST 55 BASIC ‘’MOV a#A,-(R)** TEST 
2800 eRe Ree TeeAeeeteArte nt 
2801 005700 1S155: 
2802 005700 012700 000055 MOV #55,R0 7:LOAD RO WITH TEST NUMBER 
2803 005704 012704 063322 MOV #DWTA,RS ;RESULT S / B = MDWTA 
2804 005710 012702 063312 MOV #MBUFO,R2 :DEST ADDR = MBUFO 
2805 005714 012705 063314 1$: MOV #MBUFO+2,R5 ¢ INITIAL DEST ADDR = MBUFO+2 
2806 005720 005012 ¢ (R2) MAKE [DEST] = 000000 
oo 005722 000257 Cuc : SCOPE SYNC 
344 005724 013745 063276 2$: MOV O#ATA,-(R5) ; TEST THE MOV 
2811 005730 020412 CMP R4,(R2) RESULT = 000000 
saig 005732 001402 BEQ 4$ ;BR IF YES 
2814 005734 000000 3$: HALT :MOV DELIVERED THE WRONG RESULT 
th 005736 000766 BR 1$ ;LOCK ON HARD ERROR 
6 
2817 005740 020502 4$: CMP R5,R2 :DID DEST REG GET DECREMENTED ?? 
Hy 005742 001402 BEQ 18156 ;;BR IF YES 
2820 005744 000000 S$: HALT ;MOV FAILED TO UPDATE REGISTER 
2821 005746 000762 BR 1$ sLOCK ON HARD ERROR 


CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 


005750 


005772 
005774 


006000 
006002 


006004 
006006 


006010 


006032 
006034 


006040 
006042 


006044 
006046 


006050 
006054 


006056 
006060 


006062 


006074 
006076 


006100 
006104 
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020412 
001402 


000000 
090770 


020412 
001402 


000000 
000766 


022705 
001402 


000000 
000761 


012700 


000257 
012503 


022703 
001402 


oo 


000056 
063312 
063322 
063276 


063312 


000057 
063312 
063322 
063300 


063312 


063276 


000060 
063276 


063322 
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E 
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(R),@#a"’ TEST SEQ 0056 


5 
13:53 PAGE 57 


,, teeererereresrrerrerrrrererereererterertererereeneerteseraneeee 


(R),a#A’’ TEST 


,, eeeeerereereerrerrerererererecereereeetereeereneaeeeneeneeneeeee 


;;LOAD RO WITH TEST NUMBER 
;DEST ADDR = MBUFO 

:RESULT $ / B = #DWTA 

; SOURCE ADDR = ATA 

:MAKE CDESTJ = 000000 
;SCGPE SYNC 


; TEST THE MOV 


;RESULT = #DWIA ?? 
;;BR IF YES 


;MOV DELIVERED THE WRONG RESULT 
;LOCK ON HARD ERROR 


“math areterereeeeerereereteeeeeeereeeeeeeteeeeeeeeeteeeeeeneeeeeeeeeeee 


-(R),a#A"’ TEST 


+ @M@eReeeeeteeeeeeteeteeeereteeeeeeeeeeeeeeeeeeeeneeeeteteeeeteeese 


s*TEST 56 BASIC ‘MOV 
TS1T56: 
MOV #56,R0 
MOV #MBUFO,R2 
MOV ADWTA,RS 
MOV #ATA,RS 
1$: CLR (R2) 
ccc 
2$: MOV (RS), a#MBUFO 
CMP RG, (R2) 
BEQ TS$157 
3$: HALT 
BR 1$ 
S*TEST 57 BASIC "MOV 
18157: 
MOV #57,R0 
MOV #MBUFO,R2 
MOV #DWTA,RG 
1$: MOV MATA+2,R5 
CLR (R2) 
CCC 
2$: MOV 
CMP R4,(R2) 
BEQ 4% 
3$: HALT 
BR 1$ 
4$: CMP MATA,RS 
BEQ 1S160 
5$: HALT 
BR 1% 


;;LOAD RO WITH TEST NUMBER 
;DEST ADDR = MBUFO 
;RESULT S / B = MDWTA 
INITIAL SOURCE ADDR = ATA+2 
: MAKE CDEST] = 000000 

; SCOPE SYNC 


-(R5),a#MBUFO ;TEST THE MOV 


;RESULT = #DWTA ? 
;BR IF YES 


;MOV DELIVERED THE WRONG RESULT 
;LOCK ON HARD ERROR 


;D1D THE SRC REG GET DECREMENTED ? 
;;BR IF YES 


;MOV FAILED TO UPDATE SOURCE REG 
;LOCK ON HARD ERROR 


Sp eeerererreererererereereeeerreteerereAneeeeneKeneeeeerenenerere 


:*TEST 60 


*s@@eeenkeratereeerereereeteteeeereeeeeeeeeekeeeeeeeeeeeeeteeeeeneeeese 


15160: 
1$: 


2$: 


BASIC ‘MOV 


#60,R0 
#ATA,RS 
R3 
(R5)+,R3 


#DWIA,R3 
4% 


(RA) ,RB’’ TEST 


; INITIAL SOURCE ADDR = ATA 
;MAKE CDEST) = 000000 
SCOPE SYNC 


;TEST THE MOV 


RESULT = #DWITA ? 


::LOAD RO WITH TEST NUMBER | 
sBR IF YES | 
j 


5 - 
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CQKDAD.P11 “SEP=79 13:31 160 SiC "MOV = =(RA),RB"’ TEST SEQ 0057 

2879 

2880 006106 000000 3$: HALT ;MOV DELIVERED WRONG RESULT 

ooa5 006110 000766 BR 1$ ;LOCK ON HARD ERROR 

2883 006112 022705 063300 4$: CMP MATA+2,R5 :010 SOURCE REG GET INCREMENTED 

oes 006116 001402 BEQ TST61 :;BR IF YES 

2886 006120 000000 5$: HALT ;MOV FAILED TO UPDATE SOURCE REGISTER 

ot 006122 000761 BR 1$ ;LOCK ON HARD ERROR 

2889 dancin cht 

2890 :*TEST 61 BASIC "MOV X(RA),RB’’ TEST 

2891 - REAR Kee eee eee terre eee eee eeee eee eeeeKeteKeteeteKereeeeees 

2892 006124 S161: 

2893 006124 012700 000061 MOV #61,R0 ;;LOAD RO WITH TEST — 

2894 006130 012705 063276 MOV MATA,RS ;BASE SOURCE ADDR = 

2895 006134 005003 1$: CLR R3 ;MAKE CDESTJ = 000000. 

94] 006136 000257 ccc :SCOPE SYNC 

444 006140 016503 900002 2: MOV 2(R5) ,R3 ;TEST THE MOV 

2900 006144 022703 064032 CMP #OWTB,R3 ;RESULT = #DWIB ? 

334 006150 001402 BEQ TST62 ::BR IF YES 

2903 006152 000000 3$: HALT ;MOV FAILED TO DELIVER CORRECT RESULT 

2904 006154 000767 BR 1$ ;LOCK ON HARD ERROR 

2905 MUTTITITITITTTII TELL LILILI LITTLE LLL 

2906 #TEST 62 BASIC ‘MOV = @X(RA),RB"’ TEST 

2907 L Aeeeeeeeeteeeenretereteettereeeeeeeereeneneeteneneeeeeereeeeneee 

2908 006156 TST62: 

2909 006156 012700 000062 MOV #62,R LOAD RO WITH TEST NUMBER 

2910 006162 01273/ 063324 063314 MOV sputae2, awMBuFO+ 2" ;SET UP ADDRESS TABLE MBUFO 

2911 006170 012705 063312 MOV #MBUFO, R5 ;BASE ADDRESS IN R5 

2912 006174 005003 1$: CLR R3 sMAKE CDESTJ = 000000 

coir 006176 000257 ccc :SCOPE SYNC 

4 
db, 006200 017503 000002 2$: MOV @2(R5) ,R3 TEST THE MOV 
6 

2917 006204 022703 177777 CMP #-1,R3 sRESULT = 177777 

2918 006210 001402 BEQ = T$163 ::BR IF YES | 

2920 006212 000000 3$: HALT ;MOV DELIVERED THE WRONG RESULT 

2921 006214 000767 BR 1$ ;LOCK ON HARD ERROR 

cece j sOCCeReeSeeoesreserereresessoeCeneeeTeesHessesoeETENseseEESTEeS | 

2924 :*TEST 63 BASIC "MOV (R)*,X(R)** TEST 

2925 + eeeeeeeeeeeeee eee eee eee tee eee eee eee eee Kee Kee eee eee eee 

2926 006216 1$163: 

2927 006216 012700 000063 MOV #65,R0 ;;LOAD RO WITH TEST NUMBER 

2928 006222 012704 125252 MOV #125252,R4 sRESULT S / B = 125252 

2929 006226 012702 063320 MOV #MBUF1+2,R2 sFINAL DEST ADDR = MBUFI+2 

2930 006232 010457 063312 MOV R4 ,a#MBUF 0 ;SOURCE OPERAND = 125252 

2931 006236 012705 063312 1$: MOV #MBUFO,RS :CR5] = INITIAL SRC ADDR = MBUFO 

2932 006242 005012 CLR (R2) "WAKE (DEST) = 000000 | 

2933 006244 000257 CCC ; SCOPE SYNC 
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006246 


006252 
006254 


006256 
006260 


006262 
006266 


006270 
006272 


006274 
006274 


006300 


006324 
006326 


006330 
006334 


006336 
006340 


006342 
006544 


006346 
006350 


006352 


006372 
006374 
006400 


BASIC LOG 
11-SEP-79 1 


012565 


020412 
001402 


000000 
000766 


022705 
001402 


000000 
000761 


012700 
032737 


010412 
000257 


020537 
001402 


000000 
000770 


020412 
001402 


000000 
000764 


020537 
001002 


1¢ TESTS 
13:31 


000004 


063314 


000064 
000002 


063312 


000065 
065312 
125252 


063312 


063234 
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163 BASIC "MOV (R)*,K(R)" TEST 

2s: MOV (R5)+,4(R5) ; TEST THE MOV 
CMP R4,(R2) sRESULT = 125252 ? 
BEQ 4$ ;BR IF YES 

3$: HALT 7 MOV DELIVERED WRONG RESULT 
BR 1$ [LOCK ON HARD ERROR 

4%: CMP #MBUFO+2,R5 ;DID REGISTER GET INCREMENTED ? 
BEQ TS164 7;BR IF YES 

5$: HALT ;MOV FAILED TO UPDATE REGISTER 
BR 1$ ;LOCK ON HARD ERROR 


,eeeetervererereerrerereererererererenererareteneeeaeseeeeAnAeteeee 


BASIC "CMP R,@MA"’ TEST WITH CR) = [A] 


- etererrrerrrrerereretererererrereteteteteeeeeeeeeeeeeeeeeeeeeene 


LOAD n WITH TEST NUMBER 


BREAKPOINT HALT SET ?? 
:BR IF NOT 

;BREAK - DEPRESS CONTINUE TO RESTART 
;DEST ADDR = MBUFO 
;RESULT S$ / B= 125252 
; SOURCE OP = 125252 
MAKE (DEST) = 125252 

; SCOPE SYNC 


7 TEST THE CMP 
;BR IF “‘2"' WAS SET = IT SHOULD BE 


:CMP FAILED 10 SET ‘'27"' 
;LOCK ON HARD ERROR 


1S RESULT STILL = 
::;BR IF YES 


CMP ALTERED [DEST] 
;LOCK ON HARD ERROR 


125252 ? 


*"*@eeeeeeeeteeterereeeetereteeeeeeeeeeeeeaeeetentereteeeeneteneeeete 


“CMP R,@M#A’’ WITH CR) NOT EQUAL 10 [A] 


*“‘@@@eeeeereeeteeteeeeteeeteteteteeetetteereeeeeeeeeeeeeeeeeteeeneneenes 


TEST 64 
1S164: 
MOV #64,R0 
.SBTTL USER CONTROLLED BREAKPOINT -- BIT 
BIT #B1T1,a#BPTLOC 
BEQ .*4 
HALT 
MOV #MBUFO,R2 
MOV #125252,R4 
1$ MOV R4,RS 
MOV R4,(R2) 
ccc 
2s CMP RS, a#MBUFO 
BEQ 4% 
3$ HALT 
BR 1$ 
4$ CMP R4,(R2) 
BEQ TS165 
5$: HALT 
BR 1$ 
s*TEST 65 BASIC 
15165: 
MOV #65,R0 
MOV #MBUFO,R2 
MOV #125252 ,R4 
1$: CLR RS 
MOV R4,(R2) 
$(C 
2s: CMP RS, aeMButO 
BNE 1$166 


;;LOAD RO WITH TEST NUMBER 
;DEST ADDR = MBUFO 
MAKE RESULT S / B = 125252 
;CR5] = SOURCE OP = 000000 
MAKE [DEST] = 125252 
;SCOPE SYNC = MAKE Z=1 


sTEST THE CMP 
3:BR 1F 2-0 - JLT SmOULD BE 


SEQ 0058 
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006402 
006404 


006424 
006426 


006434 
0064 36 


006440 
006442 


006444 
006444 
006450 
006454 
006460 
006464 


006466 


006474 
006476 


006500 
006502 


006504 
006504 
096510 
006512 
006514 


006516 


006522 
006526 


006530 
000532 


L 
“SEP-7 


000000 
000770 


020412 
001402 


000000 
000767 


020412 
001402 


000000 
000766 


012700 
005003 
005103 
000257 


042703 


022703 
001402 


000000 
000766 


oo 


177777 


000067 


177777 


177700 


000070 


177400 
000377 


063312 


063312 


H § 
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165 BASIC “CMP R, asa’ WITH CR] NOT EQUAL TO [A] 


3$: HALT CMP FAILED TO CLEAR ‘'2"" 
BR 1$ ;LOCK ON HARD ERROR 


peeeeeeeerererereererereeereerereererereneeeteererereerereeeTTe 
:*TEST 66 BASIC ‘‘BIS #N,a#A"’ TEST - N=177777,CAJ=000000 


*s@@eterererteetererererereetertetetereereteeeeeeeteeeeneeeeeeeeeteeeere 


1S166: 


MOV #66,R0 7;LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 7DEST ADDR = MBUFO 
MOV #-1 RG ; RESULT S / B = 177777 
1$: CLR (R2) ;CDESTJ = 000000 
ccc ;SCOPE SYNC 
2$: BIS #-1,aeMBUFO sTEST THE BIS 
CMP R4,(R2) ;RESULT OK? 
BEQ 1S167 3;BR IF YES 
3$: HALT :BIS FAILED TC SET ALL BITS IN BITFLG 
BR 1$ ;LOCK ON HARD ERROR 


ppeeeeenenerrerreerereteeteereeeeretereeteneeeeeeeeenereeereTeTe 
s*TEST 67 BASIC “BIC #N,aM#A"’ TEST 


sj eeeereerrrerrrererererenereeteeerereeneaeaeeeeneeneneerneenenes 


TST67: 


MOV #67,R0 ::LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 sDEST ADDR = MBUFO 
MOV #77,R4 sRESULT S / B = 77 
1$: MOV #-1,(R2) sMAKE CDEST) = 177777 
CCC ;SCOPE SYNC 
2$: BIC #177700,a#MBUFO ; TEST THE BIC 
CMP R4,(R2) :DID RESULT = 77 ? 
BEQ T8170 “OR FF VES 
3$: HALT :BIC DELIVERED THE WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


fF ehapd-tg~eiiatabaad rete tag etna tala taal titel a cana hain cok 


;*TEST 70 BASIC “'BIC #N,R TEST 


‘*@ekekekrereeeereeteeeeeeeteeeeeeeeeeeeteeeeeeetetereeeeeeeteteeeeete 


1$170: 


MOV #70,R0 3;LOAD RO WITH TEST NUMBER 
1$: CLR R3 sCDESTJ] = 177777 
COM R5 
ccc ; SCOPE SYNC 
2$: BIC #177400,R3 ; TEST THE BIC 
CMP #377,R3 RESULT OK? 
BEQ TS171 :;BR IF YES 
3$: HALT ;BIC FAILED TO CLEAR H1-BYTE 
BR 1$ ;LOCK ON HARD ERROR 


SEQ 0059 





CQKDAD.P1 


006560 
006566 


006602 


006604 
006604 
006610 
006614 
006616 


006622 
006626 


006630 
006632 


006654 
006656 


006662 
006664 


al 


1-SEP- 


042766 


010602 
005722 
020412 
001402 


000000 
000762 


010506 


012700 
012703 
000257 


062703 


022703 
001402 


000000 
000766 


020412 
001402 


000071 
000357 


000377 


000020 


000072 
000002 
000002 
000004 


000073 
063312 
000004 
000002 


000002 


000002 
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170 BASIC ‘BIC #N,R" TEST 


Fe en 


s*TEST 71 BASIC ‘BIC #N,2(SP)"* TEST 


bd ,ettererrerreerrrerererrererererereerererereneteneeteeenteeeeeeeee 


$171: 


MOV #71,R0 :;LOAD RO WITH TEST NUMBER 
MOV #357,RG “RESULT S / B = 357 
MOV SP RS :SAVE SP 
1$: MOV RS. SP :RESET SP FOR ERROR LOOP 
MOV #377,-(SP) :(DEST] = 377 PUT ON STACK 
1ST -(SP) sDECREMENT SP 
CCC ;SCOPE SYNC 
2$: BIC #20,2(SP) TEST THE BIC = CLEAR BIT 4 
MOV SP,R2 ;CR2] = DEST ADDR 
TST (R2)+ 
CMP RG, (R2) RESULT = 357? 
BEQ 4$ :BR IF YES 
3$: HALT BIC FAILED TO CLR BIT2 OF DEST 
BR 1$ sLOCK ON HARD ERROR 
4$: MOV R5,SP 
Sp eeeeerereenrereeerieeetereeeeereeeteneeneeerenteneneenateeeeenee 
s*TEST 72 BASIC “ADD #N,RN '* TEST 
“Meee eeeeeeeeeeeeeeeeeeReeeeekaeeeaeteaekeneeaakeeteteneeeeee 
1§172: 
MOV #72,R0 LOAD RO WITH TEST NUMBER 
1$: MOV #2,R3 sMAKE CDESTJ = 2 
CCC SCOPE SYNC 
2$: ADD #2,R3 TEST THE ADD 
CMP #4,R3 sRESULT = 4 ? 
BEQ 18173 :;BR IF YES 
3$: HALT :ADD DELIVERED THE WRONG RESULT 
BR 1$ sLOCK ON HARD ERROR 


**@eaeeeeerreeereereeereeeeeereeeeeeeeeee eee eeeeeeeeeeeeeeeeeee 


S*TEST 73 BASIC ‘ADD #N,(R) '' TEST 


So eeeeerereceeererererererereeereresetenenetanenatenenarenenenene 


TS173: 


MOV #73,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 DEST ADDR = MBUFO 
MOV #4 ,RG RESULT S / B= 
1$: MOV #2,(R2) ;MAKE CDEST] = 2 
ccc ; SCOPE SYNC 
2$: ADD #2,(R2) ;TEST THE ADD 
CMP RG, (R2) RESULT = 4 ? 
BEQ TS174 ;;BR IF YES 








,..5 
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CQKDAD.P11 11-SEP-79 13:31 173 BASIC "ADD @#N,(R) “' TEST SEQ 0061 
3103 006666 000000 3$: HALT ;ADD DELIVERED THE WRONG RESULT 
Sloe 006670 000767 BR 1$ ;LOCK ON HARD ERROR 
3106 -eeeetererrerrereerererererereeerenieneeeeeeeeeeeeeteneeeeeeeeee 
3107 TEST 74 BASIC “ADD #N,X(R)' TEST . 
3108 ‘eee eeeeteterereterereteeeeeeteReeeeeeeteReKeneeeeteeteeeeeteese 
3109 006672 1$176: 
3110 006672 012700 000074 MOV #74,R0 ;;LOAD RO WITH TEST NUMBER 
3111 006676 012704 000002 MOV #2,R4 sRESULT S / B = 2 
3112 006702 012702 063314 MOV #MBUFO+2,R2 DEST ADDR = MBUF 0 + 2 
3113 006706 012705 063212 1$: MOV #MBUFO,RS ;BASE DEST ADDR = MBUFO 
3114 006712 005012 CLR (R2) :MAKE CDESTJ = 000000 
ed 006714 000257 ccc ; SCOPE SYNC 
aia 006716 062765 000002 000002 2%: ADD #2,2(R5) 3; TEST THE ADD 
3119 006724 020412 CMP RG, (R2) sRESULT = 2 ? 
a5 006726 001402 BEQ 18175 3;BR IF YES 
3122 006730 000000 3$: HALT ;ADD DELIVERED THE WRONG RESULT 
tty 006732 000765 BR 1$ ;LOOP ON HARD ERROR 
3125 ppeeeeerererreeenereereeerererereeteeeeeeeeeeKeReete Ree TEES 
3126 s*TEST 75 BASIC “‘CMPB #N,(SP)+°" TEST 
3127 ppt eeeeeeerererereeeretetetreeeerteeeeeeeeeteeeeeeeeteeenereeee 
3128 006734 TST75: 
3129 006734 012700 000075 MOV #75,R0 3;LOAD RO WITH TEST NUMBER 
3130 006740 012704 177400 MOV #177400,R4 sRESULT S / B = 177400 
3131 006744 010605 MOV SP,R5 ;SAVE SP 
3132 006746 010602 MOV SP,R2 :SET UP DEST ADDR 
3133 006750 005742 TST -(R2) ;R2 CONTAINS DEST ADDR 
3134 006752 010506 1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
3135 006754 010446 MOV R4,-(SP) sMAKE CDEST] = 177400 - 
sae 006756 000257 ccc :SCOPE SYNC = “‘2'' = 0 
AF 4 006760 122726 000000 2$: CMPB #0,(SP)¢ ;TEST THE CMPB 
aiet 006764 001402 BEQ 4$ :BR IF ‘2°’ SET - 1T SHOULD BE 

4 
3142 006766 000000 3$: HALT :CMPB FAILED TO SET ‘'2"' 
ez 006770 000770 BR 1$ ;LOCK ON HARD ERROR 

44 
3145 006772 020506 4$: CMP R5,SP :D1D SP GET UPDATED BY 2? 
te 006774 001402 BEQ 6$ :BR IF YES 

4 
3148 006776 000000 5$: HALT 7CMPB FAILED TO UPDATE SP PROPERLY 
$150 007000 000764 BR 1$ ;LOCK ON HARD ERROR 
3151 007002 020412 6$: CMP R4,(R2) ;CDEST] ALTERED? 
ses 0070046 001402 BEQ TS176 7;BR IF NOT 
3154 007006 000000 7$: HALT ;CMPB MODIFIED CDEST) 
3155 007010 000760 BR 1$ ;LOCK ON HARD ERROR. 
BP ppeeeeeeeeteeneresenreereeetrereteeerreteeereeeeeteeeee RTE EEE TES 
3158 StTEST 76 BASIC "'CMPB (RA)+,(RB)+" = SRC AND DEST EVEN | 


CQKDA-D KD11-K BAS] 
CQKDAD.P11 


WAAWw 


a th et ed et et th eh 
~“ 


LAW AAA NO AO AO A A I 


se 
oO 
o 


007032 
007034 


007036 
007040 


007042 
007044 


007046 
007052 


007054 
007056 


007060 
007064 


007066 
007070 


007072 
007074 


007076 


007100 
007102 


007104 


007130 
007132 
007134 


007136 
007140 


007142 
007146 


C LO 
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001402 


000000 
000770 


022703 
001402 


000000 
000763 


022705 
001402 


000000 
000756 


020412 
001403 


000000 
010412 
000751 


000000 
000767 


022703 
001402 


000076 
177777 
063324 
063330 


063325 


063331 


000077 
177777 


063325 


063326 
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K 5 
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+"' = SRC AND DEST EVEN 


--@erertrerertertererererererrerererereteerteneeeeeeneteeeteneretete 


1S176: 


1$: 


2$: 


3$: 
4$: 
5$: 
6$: 
7$: 
8$: 


9$: 


#76,R0 ;;LOAD RO WITH TEST NUMBER 
#-1 RG ;RESULT S / B = 177777 
#OWTA+2,R2 ;DEST ADDR = DWTA+2 
#DWTA+6,R5 ;SRC ADDR = DWTA+6 
R2,R3 3R3 GETS DEST ADDR 
; SCOPE SYNC 
(R5)+,(R3)+ ;TEST THE CMPB 
4$ ;BR IF “'2"' = 1 = 1T SHOULD BE 
;CMPB FAILED TO SET ‘'2"" 
1$ ;LOCK ON HARD ERROR 
#DWTA+3,R3 ;D1D DEST REG GET UPDATED? 
6$ ;BR IF YES 
;CMPB FAILED TO UPDATE DEST REG 
1$ ;LOCK ON HARD ERROR 
#DWTA+7,R5 ;D1D SRC REG GET UPDATED? 
8$ :BR IF YES 
;CMPB FAILED TO UPDATE SRC REG 
1$ ;LOCK ON HARD ERROR 
R4,(R2) 01D CDEST] GET ALTERED? 
TS177 :;BR IF NOT 
;CMPB DELIVERED A RESULT 
R4,(R2) ;RESTORE CDESTI 
1$ ;LOCK ON HARD ERROR 


sy eteeerereereereereererterereretereneseneeeKeReaeeeetaeeeateteee 


s*TEST 77 


MARTE eeeeeeeetetereeeeeeeteeeeeeeeaeeeeeeeetateeteteee 


1$177: 


1$: 


2s: 


3$: 


4$: 


BASIC "‘CMPB (RA)+,(RB)+'* = SRC AND DEST ODD 


#77,R0 >;LOAD RO WITH TEST NUMBER 
#-1,R4 RESULT S / B = 177777 
#DWTA+2 ,R2 ;DEST ADDR = DWTA+2 
#DWTA+5 RS ;SRC ADDR = DWTA+5 
ADWTA+3,R3 :R3 GETS DEST ADDR+1 
; SCOPE SYNC 
(R5)4+,(R3)¢ ; TEST THE CMPB 
4% BR IF "'2"' = 1 = IT SHOULD BE 
:CMPB FAILED TO SET ‘'2"" 
1$ ;LOCK ON HARD ERROR 
MDWTAS4 RS ;01D DEST REG GET UPDATED? 
6$ ;BR IF YES 


SEQ =“ 


COKDA-D KD11-K BASIC Loe! 


CQKDAD.P11 


007150 
007152 


007154 
007160 


007162 
007164 


007166 
007170 


007172 


007174 
007176 


007200 


007224 
007226 
007230 


007232 
007234 


007236 
007242 


007244 
007246 


007250 
007254 


007256 
007260 


007262 
007264 


007266 
007270 
007272 


11-SEP-7 


000000 
000762 


022705 
001402 


000000 
000755 


020412 
001403 


000000 
010412 
000750 


ooo°0o°e 
et aed ed ed 
Mmronrnrr 


5 
703 
000257 
122523 
001402 


000000 
000767 


022703 
001402 


000000 
000762 


022705 
001402 


000000 
000755 


020412 
001403 


000000 
010412 
000750 


1¢ TESTS 
13:31 


063330 


000100 
177400 
063326 
063330 
063327 


063330 


063331 


rian” 4 


5 
+: a 30A(1052)_ I1- SEP-79- 13:53 PAGE 64 


BASIC ‘‘CMPB (RA)+,(RB)+'’ = SRC AND DEST ODD SEQ 0063 
5$: HALT ;CMPB FAILED TO UPDATE DEST REG 
oe 1$ LOCK ON HARD ERROR 
6$: CMP WDWTA+6,RS 7D1D SRC REG GET UPDATED? 
BEQ 8% :BR IF YES 
7$: HALT ;CMPB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
8$: CMP RG, (R2) ;D1D get GET ALTERED? 
BEQ TS$1T100 : BR IF 
9$: HALT ;CMPB DELIVERED A RESULT 
MOV R4,(R2) sRESTORE CDESTJ 
BR 1$ ;LOCK ON HARD ERROR 
sterner eeeeeeeetereeteeerrrrtereretteteneeereneeeeeeKeeeeeee ees 
SSTEST 100 BASIC ‘"CMPB (RA)+,(RB)+'' = SRC / EVEN,DEST / ODD 
b 0000600000000600060006000000000000000000000008000000000000000008 
1$1100: 
MOV #100,R0 :;LOAD RO WITH TEST NUMBER 
MOV #177400,R4 sRESULT S / B = 177400 
MOV #DWTA+4,R2 ;DEST ADDR = DWTA+4 
1$: MOV #DWTA+6,R5 sSRC ADDR = DWTA+6 
MOV #DWTA+5S,R3 R3 GETS DEST ADDR 
CCC : SCOPE SYNC 
2s: CMPB (R5)+,(R3)+ ; TEST THE CMPB 
BEQ 4% :BR IF ‘2°’ = 1 = IT SHOULD BE 
3$: HALT ;CMPB FAILED TO SET ‘'2"' 
HW 1$ :LOCK ON HARD ERROR 
4$: CMP #DWTA+6,R3 :D1D DEST REG GET UPDATED? 
BEQ 6$ sBR if YES 
5$: HALT :CMPB FAILED TO UPDATE DEST REG 
BR 1$ sLOCK ON HARD ERROR 
6$: CMP #DWTA+7,R5 3D1D SRC REG GET UPDATED? 
BEQ 8$ :BR IF YES 
7$: HALT :CMPB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
8$: CMP R4,(R2) 3010 pt GET ALTERED? 
BEQ TS$1101 : BR IF NOT 
9$: HALT ;CMPB DELIVERED A RESULT 
MOV R4,(R2) sRESTORE CDESTJ 
BR 1$ sLOCK ON HARD ERROR 


sseearererererersrereeerrerererererereeneeeeeeetererenereeseneses 


T*TEST 101 BASIC “'CMPB (RA)+,(RB)*"' = SRC / ODD,DEST / EVEN 


sseeeeererrereereresereeereerereererenereteeeseresereesereseneees 


CQKDA-D KDI1-K BASIC LOGIC T 
CQKDAD.P11 11-SEP-79 13:3 


3271 007274 TST101: 


m5 
ESTS rr he "nea 11-SEP-79 15:53 PAGE 65 
1 1101 BASIC “"CMPB (RA)+,(RB)*"’ = SRC / ODD,DEST / EVEN SEQ 0064 


3272 007274 012700 000101 MOV Ae if RO ;;LOAD RO vy TEST NUMBER 

3273 007300 012704 177777 MOV »R4 sRESULT S / B = 177777 

3274 007304 012702 063324 MOV soutae2, R2 ;DEST ADDR = putas? 

3275 007310 012705 063327 1$: MOV #OWTA*5S RS ;SRC ADDR = DWTA+5 

3276 007314 010203 MOV R2,R5 :R3 GETS DEST ADDR 

asit 007316 000257 ccc ;SCOPE SYNC 

$5ap 007320 122525 2$: CMPB (R5)#,(R3)+ ;TEST THE CMPB 

344 007322 001402 BEQ 4% ;BR IF “'2'" = 1 = IT SHOULD BE 

3283 007324 000000 38: HALT ;CMPB FAILED TO SET ‘'2" 

it 007326 000770 BR 1$ ;LOCK ON HARD ERROR 

3286 007330 022703 063325 4$: CMP #DWTA+3,R3 01D DEST REG GET UPDATED? 

+4 007334 001402 BEQ 6$ ;BR IF YES 

3289 007336 000000 5$: HALT ;CMPB FAILED TO UPDATE DEST REG 

4] 007340 000763 BR 1$ ;LOCK ON HARD ERROR 

3292 007342 022705 063330 “Ge CMP #DWTA+6,R5 :D1D SRC REG GET UPDATED? 

4 007346 001402 BEQ 8$ :BR IF YES 

3295 007350 000000 7$: HALT ;CMPB FAILED TO UPDATE SRC REG 

sSer 007352 000756 BR 1$ ;LOCK ON HARD ERROR 

3298 007354 020412 8$: CMP R4,(R2) :DID lt GET ALTERED? 

44 007356 001403 BEQ TS1102 :;BR 1 

3301 007360 000000 9$: HALT ;CMPB DELIVERED A RESULT 

3302 007362 010412 MOV R4,(R2) sRESTORE CDESTJ 

Sone 007364 000751 BR 1$ ;LOCK ON HARD ERROR 

3305 js teeoererereceseeceeeotersesoeteseersoneseroaneeseneseneRteserS 
s*TEST 102 BASIC ‘MOVB (RA)+,X(RB) = SRC EVEN / DEST EVEN 

3307 Seeeee eee eee eee eee eee eet eere rere eeeeeeteeeKeeerKeeeeeeet er Aeee 

3308 007366 181102: 

3309 007366 012700 000102 MOV #102,R0 ;;LOAD RO WITH TEST NUMBER 

3310 007372 012702 063316 MOV #MBUF1,R2 ;DEST ADDR = MBUF1 

3311 007376 012703 063312 MOV #MBUFO,R3 ;BASE DEST ADDR = MBUFO 

3312 007402 012704 177400 MOV #177400,R4 ;RESULT S / B = 177400 

3313 007406 012705 064630 1$: MOV #DBTA,R5 :SRC ADDR = _DBTA 

3314 007412 012712 177777 MOV #-1,(R2) :CDEST) = 177777 

Sere 007416 000257 ccc SCOPE SYNC 

3317 007420 112563 000004 2$:  MOVB.«—«(R5)4,4(R3) «TEST THE MOVB 

3319 007424 020412 CMP R4,(R2) ;RESULT OK? 

ge50 007426 001402 BEQ 4$ ;BR IF YES 

3322 007430 000000 3$: HALT ;MOV DELIVERED WRONG RESULT 

i5z 007432 000765 BR 1$ ;LOCK ON HARD ERROR 

4 
3325 007434 022705 064631 4$: CMP #DBTA+1,R5 DID SRC REG GET INCREMENTED By +1 
3326 007440 001402 BEQ 181103 :3;BR IF YES 


CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 11-SEP- “rv 
3327 
3328 007442 000000 
3329 007444 000760 
3330 
3331 
3332 
3333 007446 
3334 007446 012700 
3335 007452 012702 
3336 007456 012703 
3337 007462 012704 
3338 007466 012705 
3339 007472 012712 
sect 007476 000257 
3342 007500 112563 
3343 
3344 007504 020412 
3345 007506 001402 
3346 
3347 007510 000000 
3348 007512 000/765 
3349 
3350 007514 022705 
3351 007520 001402 
3352 
3353 007522 000000 
3354 007524 000760 
3355 
3356 
3357 
3358 007526 
3359 007526 012700 
3360 007532 012702 
3361 007536 012703 
3362 007542 012704 
3363 007546 012705 
3364 007552 012712 
3365 007556 000257 
3366 
367 007560 112563 
3368 
3369 007564 020412 
e370 007566 001402 
3372 007570 000000 
3373 007572 000765 
3374 
3375 007574 022705 
$378 007600 001402 
3378 007602 000000 
3379 007604 000760 
3380 
3381 


064636 


000104 


177777 


000005 


064631 


N 
MACY11 30A(1052) 11-SEP-79 


5 
13:53 
1102 BASIC ‘‘MOVB (RA)+,X(RB) - 


PAGE 66 
SRC EVEN / DEST EVEN 


5$: HALT ;MOVB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
seeeeeeertererereceeeereereeeerecrretereeeeeerreetrerteretereete 
STEST 103 BASIC "MOVB (RA)+,X(RB) = SRC ODD / DEST ODD 
RTTTITITITITITTITITITITITIT TTT 
181103: 
MOV #103,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #MBUF1,R2 ;DEST ADDR = MBUF1 
MOV #MBUFO,RS SBASE DEST ADDR = MBUFO 
MOV #777,R4 ;RESULT S / B = 777 
1$: MOV #OBTB+1,R5 SRC ADDR = DBTB+1 
MOV #-1,(R2) :CDESTI = 177777 
ccc ;SCOPE SYNC 
2$: MOVB (R5)+,5(R3) ; TEST THE MOVB 
CMP R4,(R2) RESULT OK? 
BEQ 4% ;BR IF YES ) 
3$: HALT sMOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4%: CMP #DBTB+2,R5 :D1D SRC REG GET INCREMENTED By +1 
BEQ T$1104 :3BR IF YES 
5$: HALT ;MOVB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
seeeeeeeeeeeerrereertestretreeterterteneretterteneeettrereeerens 
TeTEST 104 BASIC ‘MOVB (RA)+,X(RB) - SRC EVEN / DEST ODD 


 eeeeeeeeeeereeeeeteeeeteereretereertreeeereeeetereeeeeteeeeee Ts 


TST104: 


MOV #104,R0 ;;LOAD RO WITH TEST NUMBER 
MOV #MBUF1,R2 ;DEST ADDR = MBUF1 
MOV #MBUFO,R3 BASE DEST ADDR = MBUFO 
MOV #377,R4 RESULT S / B = 377 
1$: MOV #DBTA,R5 :SRC ADDR = DBTA 
MOV #-1,(R2) ;CDESTJ = 177777 
ccc SCOPE SYNC 
23: MOVB (R5)+,5(R3) 7 TEST THE MOVB 
CMP R4,(R2) RESULT OK? 
BEQ 4% ;BR IF YES 
3$: HALT ;MOV DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP #DBTA+1,R5 ;D1D SRC REG GET INCREMENTED BY +1 
BEQ T$1105 ::BR IF YES 
5$: HALT ;MOVB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 
ssewerecererrrerererrecrescesereseseeeeseesanesenseenereaeeeeeenes 
:*TEST 105 BASIC “‘MOVB (RA)+,X(RB) = SRC ODD / DEST EVEN 


sseereacererereesrererererereesecesereseeaenesessarseseeesseeeees 


CQKDA-D KDI1-K 
CQKDAD.P11 


3394 007644 
3395 007646 


3396 
3397 007650 
te 007652 


3400 007654 
3401 007660 


3403 007662 
3404 007664 


3409 007666 


3416 007714 
3418 007716 


3420 007722 
3421 007724 


3423 007726 
3424 007730 


3426 007732 
3427 007736 


3429 007740 
3430 007742 


3435 007744 


3438 007754 


os) 
11-SEP- 


ie 
Ae 


000000 
000765 


022705 
001402 


000000 
000760 


020412 
001402 


000000 
000766 


022703 
001402 


000000 
000761 


064636 


000106 


064032 
177777 


000002 


063315 


8 
ry 5 i "ser 11-SEP-79 13 


TS$T105: 


2$: 


3$: 


4%: 


5$: 


“MOVB (RA)*,X(RB) 


#177401, RG 
#0B1B+1,R5 
#=1,(R2) 
(R5)4#,4(R3) 
R4,(R2) 

4% 

1$ 
#OBTB+2,R5 
TS1106 


1$ 


:§3 


PAGE 67 
- SRC ODD / DEST EVEN SEG 0066 


fhe a RO WITH TEST NUMBER 
;DEST ADDR = MBUFT 

;BASE DEST ADDR = MBUFO 
;RESULT S / B = Hea 


; SCOPE SYNC 


; TEST THE MOVB 


sRESULT OK? 
:BR IF YES 


7MOV DELIVERED WRONG RESULT 
;LOCK ON HARD ERROR 


;D1D SRC REG GET INCREMENTED By +1 
3;BR IF YES 


;MOVB FAILED TO UPDATE SRC REG 
;LOCK ON HARD ERROR 


? peeeerreeeeeeerereereretererererererereereKeReRAeeeAeeATe TTT 


BASIC ‘"MOVB 2(RA),(RB)*"’ TEST = SRC EVEN / DEST EVEN 


T*TEST 106 


» + eeeeeererererrerrererecerererreceerereneererrererenteresrereete 


151106: 


2$: 


3$: 


4$: 


5$: 


#106,R0 
#MBUFO,k2 
#177401 ,R4 
#OWTB,RS 


R2,R3 
#-1,(R3) 


2(R5),(R3)+ 
R4,(R2) 

4% 

1$ 
#MBUFO+1,R3 
181107 


1$ 


;LOAD RO WITH Mi NUMBER 
:DEST ADDR = MBUFO 

;RESULT S / B = 177401 
SRC ADDR = DWIB 

:R3 GETS DEST ADDR 

:CDEST) = 177400 

SCOPE SYNC 


; TEST THE MOVB 


RESULT OK? 
;BR IF YES 


;MOVB DELIVERED WRONG RESULT 
;LOCK ON HARD ERROR 


:D1D + te GET INCREMENTED? 


;MOVB FAILED TO AUTO INCREMENT DEST REG 
;LOCK ON HARD ERROR 


ss eeerereerertereerereererereeerereresereaereeeeeneeaeneEAesesees 


BASIC ‘‘MOVB 2(RA),(RB)+"’ TEST = SRC ODD / DEST EVEN 


S*TEST 107 


ppeeecerrererererserseresrreerererserteeteeeAeteseaeeseAesenesees 


TS1107: 


MOV 
MOV 
MOV 


#107,R0 
#MBUFO,R2 
#177401,R4 


;;LOAD RO WITH TEST NUMBER 
;DEST ADDR = MBUFO 
;RESULT S / B = 177401 


CQKDA-D KDIi-K BASIC LOGIC TESTS 


CQKDAD.P11 


007772 
007774 


010022 


010052 
010054 


010060 
010062 


010064 
010006 


010070 
010074 


feolelelejlejlejl ela} 
Wwron——OCOOoO 
MmM@EAMOMO PIM 


11-SEP-79 


012705 
010205 
012713 
000257 


116525 


020412 
001402 


000000 
000 766 


022703 
001402 


000000 
000761 


020412 
001402 


000000 
000765 


022703 
001402 


000000 
000760 


13:31 
064634 
177777 


000001 


063313 


063314 


cy 
1107 


1$: 
2s: 
3$: 


4%: 


5$: 


11 350A(1052) 


¢ 
11-SEP-79 


6 
15:53 PAGE 6 


8 
BASIC “WOVB 2(RA),(RB)*"’ TEST - SRC ODD / DEST EVEN 


#OBTB,R5S 
-R3 
#-1,(R3) 


= 
™Nm 


1(R5),(R3)¢ 
RG, (R2) 

4% 

1$ 

rite 5 A tthe R3 
TS1110 


1$ 


;SRC ADDR = DBTB 
:R3. GETS DEST ADDR 
:CDEST) = 177777 
:SCOPE SYNC 


; TEST THE MOVB 


;RESULT OK? 
;BR IF YES 


;MOVB DELIVERED WRONG RESULT 
;LOCK ON HARD ERROR 


:D1D DEST REG GET INCREMENTED? 
;;BR IF YES 


;MOVB FAILED TO AUTO INCREMENT DEST REG 
;LOCK ON HARD ERROR 


‘eet eeeeeereeereereeretetereeerereeeeeeereteeeeteeeeneeeeeeeteteeeee 


TeTEST 110 


7$1110: 


2$: 


3$: 


4$: 


5$: 


BASIC ‘MOVB 2(RA),(RB)+'* TEST = SRC EVEN / DEST ODD 


*-@eaneeeeeererereeeeteeeeerereteteereneteeeeteneeeeeeeeeetereeese 


#110,R0 
#MBUFO,R2 
#777,R4 
#DWTB,RS 
#MBUFO+1,R3 
#-1,(R2) 


2(R5),(R3)+ 


R4,(R2) 
4% 


1$ 


#MBUFO+2,R3 
TST111 


1$ 


;;LOAD RO WITH TEST NUMBER 
;DEST ADDR = MBUFO 

RESULT S / B = 777 

SRC ADDR = DWIB 

:R3 GETS DEST ADDR 

(DEST) = 177777 

;SCOPE SYNC 


7 TEST THE MOVB 


;RESULT OK? 
;BR IF YES 


;MOVB DELIVERED WRONG RESULT 
;LOCK ON HARD ERROR 


;D1D DEST REG GET INCREMENTED? 
:;BR IF YES 


;MOVB FAILED TO AUTO INCREMENT DEST REG 
;LOCK ON HARD ERROR 


pprewereeerererereerererterrrertererereraeAteneKeeeeAeAe ATE A AE 


BASIC ‘‘MOVB 2(RA),(RB)*"' TEST = SRC ODD / DEST ODD 


SeTEST 111 


sp tevereenrerrererrerereerererererererareereneraeerereeeesee Tee es 


1S1111: 


#111,R0 
#MBUFO,R2 
#777,R4 
#DBTB,R5 
#MBUFO+1,R3 
#-1,(R2) 


;;LOAD RO WITH Mig NUMBER 
;DEST ADDR = MBUFO 

RESULT S / B = 777 

;SRC ADDR = DBTB 

:R3 GETS DEST ADDR = MBUFO+1 
(DEST = 177777 

: SCOPE s¥Nc 


CQKDA-D_KD11-K BAS 
“7 


] 
EP-7 


0 
9 


C LOGIC TESTS 
31 


CQKDAD.P11 \1- 13: 
3495 
ob 010134 116525 000001 
3498 010140 020412 
3499 010142 001402 
3500 
3501 010144 000000 
S208 010146 000765 
3504 010150 022703 063314 
9 44 010154 001402 
3507 010156 000000 
3508 010160 000760 
3509 
3510 
3511 
3512 
3513 910162 
3514 010162 012700 900112 
3515 010166 012705 063331 
3516 010172 005003 
3517 010174 000257 
3518 
3519 010176 114503 
3520 
3521 010200 022703 177777 
3522 010204 001402 
3523 
3524 010206 000000 
3525 010210 000766 
3526 
3527 010212 022705 063330 
5528 010216 001402 
3529 
3530 010220 000000 
3531 010222 000761 
3532 
3533 
3534 
3535 010224 
3536 010224 012700 000113 
3537 010230 012705 063330 
3538 010234 005003 
3539 010236 000257 
3540 
3541 010240 114503 
3542 
3543 010242 022703 177777 
3544 010246 001402 
3545 
3546 010250 000000 
ee! 010252 000766 
54 
3549 010254 022705 063327 
3550 010260 001402 


dD 6 
om SOA(1052) 11-SEP-79 13:53 PAGE 69 


BASIC ° ‘move 2(RA),(RB)*"” TEST = SRC ODD / DEST ODD SEQ 0068 
23: MOvB 1(R5),(R3)¢ ; TEST THE MOVB 
CMP RG, (R2) sRESULT OK? 
BEQ 4% ;BR IF YES 
3$: HALT ;MOVB DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP yo th a R3 ;D1D DEST REG GET INCREMENTED? 
BEQ TST112 BR IF YES 
5$: HALT ;MOVB FAILED TO AUTO INCREMENT DEST REG 
BR 1$ ;LOCK ON HARD ERROR 
s*TEST 112 BASIC ‘‘MOVB -(RA),RB'’ TEST = SRC EVEN ADDR 
sp, eeeeraereerrereretererereererteeeeneeneenaeeeeeeeeeeenenteneeee 
TST112: 
MOV #112,R0 >;LOAD RO WITH TEST NUMBER 
1$: MOV #DWTA+7,R5 3SRC ADDR = DWIA+7 
CLR R3 ;CDESTJ] = 000000 
ccc ;SCOPE SYNC 
2s: MOVB -(R5),R3 s TEST THE MOVB 
CMP #-1,R3 sRESULT OK? 
BEQ 4% ;BR IF YES 
3$: HALT ;MOVB FAILED - WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 
4$: CMP #DWTA+6,R5 sSRC REG GET DECREMENTED? 
BEQ T$1113 > BR IF YES 
5$: HALT ;MOVB FAILED TO UPDATE SRC REG 
BR 1$ ;LOCK ON HARD ERROR 


**@eeeeeereeeeeereeeeeeeeeereeeeeeeeeeeeeteteeeeeeeeeeeeeeeteeteeese 


S*eTEST 113 BASIC "'MOVB -(RA),RB’’ TEST = SRC ODD ADDR 


sp eeteeerererereerererererereesesenerinerenananenaneneeenenenesent 
TST113: 

MOV #113,R0 :;LOAD RO WITH TEST NUMBER 
1$: MOV #DWTA+6,R5 ;SRC ADDR = DWTA+6 

CLR Bs) ;CDEST] = 000000 

CCC ;SCOPE SYNC 


2$: MOVB ~(R5) ,R3 ; TEST THE MOVB 


CMP #-1,R3 RESULT OK? 
BEQ 4% ;BR IF YES 


3$: HALT ;MOVB FAILED = WRONG RESULT 
BR 1$ ;LOCK ON HARD ERROR 


4$: CMP #DWTA+S,RS :SRC REG GET DECREMENTED? 
BEQ TST114 s:BR IF YES 


Pp eteeterterereeereereerrerereentereeetereeeteneeeraKeteneneeeeeese 
| 


= 


CQOKDA-D KDI1-K BASIC L 
CQKDAD.P11 11-SEP-7 
3551 
3552 010262 000000 
3553 010264 000761 
3554 
3555 
3556 
3557 
3558 010266 
3559 010266 012700 
3560 010272 010605 
3561 010274 012704 
3562 010300 010506 
3563 010302 012703 
3564 010306 012746 
3565 010312 010602 
3566 010314 005726 
3567 010316 000257 
3568 
3569 010320 112346 
3570 
3571 010322 022703 
3572 010326 001402 
3573 
3574 010330 000000 
3575 010332 000762 
3576 
3577 010334 020412 
3578 010336 001402 
3579 
3580 010340 000000 
3581 010342 000756 
3582 
3583 010344 020206 
3584 010346 001402 
3585 
3586 010350 000000 
3587 010352 090752 
3588 
3589 010354 010506 
3590 
3591 
3592 
3593 
3594 010356 
3595 010356 012700 
3596 010362 010605 
3597 010364 012704 
3598 010370 010506 
3599 010372 012703 
3600 010376 012746 
3601 010402 010602 
3602 010404 005726 
3603 010406 000257 
3604 
3605 010410 112346 


ola] 


000114 
177400 


064630 
177777 


064631 


000115 
177400 


064035 
177777 


oy) 11 30A(1052) 


5$: HALT 
BR 1$ 


a 
11-SEP-79 


6 
Y 13:53 PAGE 70 
3 BASIC ""MOVB -(RA),RB’’ TES! = SRC ODD ADDR 


;MOVB FAILED TO UPDATE SRC REG 
;LOCK ON HARD ERROR 


*s@eeererretrererereerereeerererererereeeneeetetetenetetereeereeee 


SeTEST 114 


BASIC ‘MOVB (RA)*+,-(SP)"’ TEST = SRC ADDR EVEN 


ppeeeeereeereerrererererrererererterereneeeneteeeeeeneeneeeeTeee 


Sie sp RO WITH TEST NUMBER 


SAV 

;RESULT S / B = 177400 
;RESET SP FOR ERROR LOOP 
:SRC ADDR = DBTA 

(DEST = 177777 

;R2 GETS DEST ADDR 
sRESET SP 

SCOPE SYNC 


; TEST THE MOVB 
;D1D MOVB INCREMENT SRC REG? 
IF YES 


;MOVB FAILED TO UPDATE SRC REG 
;LOCK ON HARD ERROR 


RESULT OK? 
;BR IF YES 


;MOVB FAILED TO DELIVER CORRECT RESULT 
;LOCK ON HARD ERROR 


:D1D SP GET PUSHED BY 2 ? 
;BR IF YES 


:MOVB FAILED TO PUSH SP PROPERLY 
;LOCK ON HARD ERROR 


RESET SP IN CASE OF ERROR 


Pere eeeeeeeeeeeetereeeteeeeeeeeteeeeeeneteteeteteeeeneteteeneee 


“MOVB (RA)+,-(SP)"* TEST = SRC ADDR ODD 


s;eenetererrrerreretresterieererererenreeeraeteretenesanenereneTs 


TST114: 
MOV #114,R0 
MOV SP,RS5 
MOV #177400,R4 
1$: MOV R5,SP 
MOV #DBTA,R3 
MOV #-1,-(SP) 
MOV SP,R2 
1ST (SP)+ 
CCC 
2$: MOVB (R3)+,=(SP) 
CMP #DBTA+1,R3 
BEQ 4$ 
3$: HALT 
BR 1$ 
4$: CMP RG, (R2) 
BEQ 6$ 
HALT 
BR 1$ 
6$: CMP R2,SP 
BEQ 8$ 
HALT 
BR 1$ 
8$: MOV R5,SP 
S*TEST 115 BASIC 
TST115: 
MOV #115,R0 
MOV URS 
MOV #177400,R4 
1$ MOV RS, SP 
MOV #OWTB+3,R3 
MOV #-1,-(SP) 
MOV SP, R2 
1ST (SF)¢ 
CCC 
2$: MOVB (R3)+,=(SP) 


;;LOAD RO WITH TEST NUMBER 
;SAVE SP 
;RESULT S / B = 177400 
RESET SP FOR ERROR LOOP 

:SRC ADDR = DWIB+3 

(DEST) = 177777 

;R2 GETS DEST ADDR 

sRESET SP 

; SCOPE SYNC 


; TEST THE MOVB 


—_—— -—-- - - — -— ——- — *= 
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010412 
010416 


010420 
010422 


010424 
010426 


010430 
010432 


010434 
010436 


010440 
010442 


010444 


010446 
010446 
010452 
010456 
010462 
010466 
010470 


11-SEP-79 
022703 
001402 
000000 
000762 


020412 
001402 


000000 
000756 


020206 
001402 


000000 
000752 


010506 


1¢ TESTS 
13:31 


064036 


000116 
063312 
000001 
064032 


MACY11 gett ie 


F 6 
) 11-SEP-79 13:53 PAGE 71 
“MOVB (RA)*+,-(SP)"° [TEST = SRC ADDR ODD 


1115 BASI 

CMP #DWIB+4 RS :01D MOVB INCREMENT SRC REG? 

BEQ 4% ;BR IF YES 
3$: HALT ;MOVB FAILED TO UPDATE SRC REG 

BR 1$ ;LOCK ON HARD ERROR 
4$: CMP RG, (R2) RESULT OK? 

BEQ 6$ ;BR IF YES 

HALT ;MOVB FAILED TO DELIVER CORRECT RESULT 

BR 1$ ;LOCK ON HARD ERROR 
6$: CMP R2,SP ;D10 SP GET PUSHED BY 2 

BEQ 8$ ;BR IF YES 

HALT ;MOVB FAILED TO PUSH SP 

BR 1$ ;LOCK ON HARD ERROR 
8$: MOV R5,SP ;RESET SP IN CASE OF ERROR 
ppeeeeeererrererereeeteeretrereeetererereerteeteeteeeeeeeetteeeee 
:*TEST 116 BASIC '‘MOVB X(R),@#A"’ TEST = SRC EVEN / DEST EVEN 
sp eeeeeeeereeereeereetereeeeetteeeeeeeeteeeeneReteeeeKeteneeeTe ee 
TST116: 

MOV #116,R0 ;;LOAD RO WITH TEST NUMBER 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #1,R4 sRESULT S / B = 1 

MOV #DW1B,R5 ;BASE SRC ADDR = DWIB 
1$: CLR (R2) :CDESTJ = 000000 

CCC ;SCOPE SYNC 


SEQ 0070 





CQKDAD.P11 
3638 010472 
3639 
3640 010500 
3641 010502 
3642 
3645 010504 
3644 010506 
3645 
3646 
3647 
3648 010510 
3649 010510 
3650 010514 
3651 010520 
3652 010524 
3653 010530 
3654 010552 
3655 
3656 010534 
3657 


3658 010542 
3659 010544 


3661 010546 
3662 010550 


3674 010576 


3670 010604 
3677 €10606 


3679 0106010 
3680 010612 


3682 
36083 
36084 0106014 
3685 010614 
3686 
3687 010620 
3688 010626 


3093 010646 





11-SEP-79 
116537 


020412 
001402 


000000 
000767 


116537 


020412 
001402 


000000 
000767 


116537 


020412 
001402 


000000 
000767 


012700 


032737 
001401 


005012 


13:31 


000006 063312 


000117 
063312 
000001 
064634 


000001 


000120 


064032 


000006 


000121 
000004 
063312 


000400 
064634 


CQKDA-D KD11-K BASIC Los! € TESTS 


063312 


063313 


063234 


G 
1) ae 30A(1052) 11-SEP-79 13. 5% PAGE 72 
116 BASIC "MOVE K(R),a#A" TEST = SRC EVEN / DEST EVEN 


23: MOvVB 6(R5) ,aseMBuUFO sTEST THE MOVB 
CMP R4,(R2) sRESULT OK? 
BEQ TST117 :;BR IF YES 
3$: HALT ;MOVB DELIVERED — RESULT 
BR 1$ ;LOCK ON HARD ERRR 
iS puepnnesatanaenenenadabindetaicoresuestanmtanssseiiinanelibl 
s*TEST 117 BASIC "‘MOVB X(R),a@A"' TEST = SRC ODD / DEST EVEN 
® ,eaeetererererrereereeereeerereeeetentereneteeeeeeeeeeteeeteetete 
iStli?7: 
MOV #117,R0 ;;LOAD RO WITH + NUMBER 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #1,R4 =RESULT $/621 
MOV #0BTB,R5 ;BASE SRC ADDR = DBTB 
1$: CLR (R2) ;CDEST) = 000000 
CCC ;SCOPE SYNC 
2$: MOVB 1(R5) ,a#MBUFO ; TEST THE MOVB 
CMP R4,(R2) sRESULT OK? 
BEQ 781120 ;;BR IF YES 
3$: HALT s;MOVB DELIVERED WRONG RESULT 
BR 1$ ;LOCK ON HARD ERRROR 
sy eeeeeereeerrerreererererereetterteneenaaeneneeeneenenetentereese 
s*TEST 120 BASIC ‘‘MOVB X(R),a#A"’ TEST - SRC EVEN / DEST OLD 


ps, etter ereererererereererererererenerenetetaneteneneneeeretenese 


1$1120: 


MOV #120,R0 :;LOAD RO WITH TEST NUMBER 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #400,R4 ;RESULT S / B= 400 
MOV #OWTB,RS sBASE SRC ADDR = DwWIB 
1$: CLR (R2) ;CDESTJ = 000000 
Cet ;SCOPE SYNC 
23: MOVB 6(R5),a#MBUFO+1 =; TEST THE MOVB 
CMP R4,(R2) ;RESULT OK? 
BEQ TST121 3;BR IF YES 
3$: HALT ; :MOVB DELIVERED WRONG RESULT 
aR 1$ :LOCK ON HARD ERRROR 
° ;faeeeeeteeeeeeeeeeeenteeeeseesereeseeegegegenerensegeeresessess 
SeTEST 121 BASIC ""MOVB X(R),a#A"’ TEST = SRC ODD / DEST ODD 
"“*@@nreeeeeeeereereteeeeereteereereeeeeeteereteeeneeekaeeteeeeteeeeeteneeenert 
1$1121: 
MOV #121,R0 LOAD RO WITH TEST NUMBER 
.SBTTL USER CONTROLLED BREAKPOINT -- BIT2 
BIT + had Q@#BPTLOC ;BREAKPOINT HALT SET ?? 
BEQ , “BR IF NOT 
HALT ;BREAK = DEPRESS CONTINUE TO RESTART 
MOV #MBUFO,R2 DEST ADDR = MBUFO 
MOV #400,R4 sRESULT S / B = 400 
MOV #DBTB,R5 ;BASE SRC ADDR = DBIB 
1$ CLR (R2) ;CDEST) = 900000 


SEQ 0071 


sabinsahennesduieeipaib mein tatnceteanasataamepaiomiataaeniestammeigemeaal 






CQKDAD .P 


010650 
010652 


010660 
010662 


~~ 
oO 
™N 
o 


010714 
010714 
010720 
010722 


010724 
010726 


010730 


010732 
010734 


010736 


010740 
010742 


010744 
010744 


010746 
010750 


000257 
116537 


020412 
001402 


000000 
060767 


012700 
000257 


001404 


000402 


00000 
000770 


012700 
000277 


001402 


000000 
000774 


100402 


000000 
000771 


102402 
000000 
000766 
103402 


000000 
000763 
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13:31 


000001 


000122 


000123 






























063313 


MACY11 306A(1052) 





11-SEP- -79" 13. +S PAGE 73 


USER CONTROLLED BREAKPOINT -- BIT2 


SCOPE SYNC 
1(R5) ,a#MBUFO*1 ; TEST THE MOVB 


R4,(R2) sRESULT OK? 
TST122 ;;BR IF YES 

;MOVB DELIVERED WRONG RESULT 
18 ;LOCK ON HARD ERRROR 


pL eeteeeerererererererererererereerererenetenenanteneneneeeeeenee 


BASIC QUICK VERIFY TEST FOR BM] ,BEQ,BVS,BCS-FLG=0 


s,Veeerereerteorerereererererereeeeerereneeeraneerenteneneeeeeeeeee 


#122,R0 ;;LOAD RO WITH TEST NUMBER 
;CLEAR ALL FLAGS 
3$ ;NO BR SHOULD OCCUR-FLAG=0 
3$ ;NO BR SHOULD OCCUR-FLAG=0 
3$ NO BR SHOULD OCCUR-FLAG=0 
3$ ;NO BR SHOULD OCCUR-FLAG=0 
TS1123 ;;G0 TO NEXT TEST 
;ONE OF ABOVE BR'S FAILED 
1$ s;ERROR LOOP RETURN 


-@eetehetererteretereetrrereeeeeeeretetreeeeteaeeeeeeteneneeeeeeeeeeet 


BASIC QUICK VERIFY TEST FOR BMI],BEQ,BVS,BCS-FLAG=1 


*s@@nrereerereterereneeretereeeeteeteeeeeteeteeeeeeteeeeeeeeeeeetetere 


‘aaa 
2%: MOvB 

CMP 

BEQ 
3$: HALT 

BR 
s*TEST 122 
TS1122: 

MOV 
1$: CCC 
23: BEQ 

BM] 

BVS 

BCS 

BR 
3$: HALT 

BR 
SeTEST 123 
1$1123: 

MOV 
1$: $cc 
218: BEG 
3$: HALT 

BR 
22%: BM] 
5$: HALT 

BR 
238: BvS 
7$: HALT 

BR 
24%: 

BCS 
9$: HALT 

BR 


#123,R0 :;LOAD RO WITH TEST NUMBER 
sMAKE N:C = 1111 

22% ;TEST THE BEQ-1T SHOULD BR 
;BEQ FAILED 

1$ ;ERROR LOOP RETURN 

23% ;TEST THE BMI-17T SHOULD BR 
:BM] FAILED 

1$ sERROR LOOP RETURN 

24% ;TEST THE BVS-IT SHOULD BR 
:BVS FAILED 

1$ ;ERROR LOOP RETURN 

T$1124 7; TEST THE BCS-I1T SHOULD BR 
;BCS FAILED 

1$ sERROR LOOP RETURN 


**@@@eeeeteeeteeneeerereteneteeteereeeteeteeeeeeteeneeeeeteneeeeeeenes 


SeTEST 126 





BASIC BvC TEST WITH v=l 





SEQ 00 


SS, 
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COKDAD.P11 


010752 
010752 


010756 


010760 
010762 


010764 
010766 


010770 
010770 


010774 


010776 
010776 


011000 
011002 


011004 
011004 


11-SEP-79 


012700 
000262 


102001 
000402 


000000 
000773 


012700 
000242 


102002 


000000 
000774 


012700 
000257 


002002 


000000 
000774 


012700 


000257 
00262 


002001 
000402 


000000 
000772 


13:31 


000124 


000125 


000126 


000127 


1 6 
11-SEP-79 7” 5% 


MACY11 30A(1052) PAGE 74 
1124 BASIC BvC TEST WITH v=1 
,,eeeerrerrererererererererrererererereerereneeteeeeeeretereeAeee 
TS1124: 
MOV #124,R0 ;;LOAD RO WITH TEST NUMBER 
1$: SEV ;MAKE v=1 
2%: Bvc %% ;TEST THE BvC-IT SHOULDN'T BR 
BR T$1125 360 TO NEXT TEST 
3$: HALT ;BvC FAILED 
BR 1$ sERROR LOOP RETURN 


;, eeteeererererererrererrereerererererererenneneneneeeereneneeeeeenee 


s*TEST 125 BASIC BvC TEST WITH v=0 
pleeereeerererererereererereetresereereraeeaeneanenenenenereenere 
TST125: 

MOV #125,R0 s;LOAD RO WITH TEST NUMBER 
1$: CLV sMAKE v=0 
2$: 

BvC 781126 3: TEST THE BvC-I1T SHOULD BR 
3$: HALT :BvC FAILED 

BR 1$ ;ERROR LOOP RETURN 


;, eeeeeerertererenrertteserererereretarteneerenerenaeeneeeneNtesese 


SeTEST 126 BASIC BGE TEST WITH N,V = 00 


sie eeeerereerererererererereteerenetereenenereneneneneneneeneenese 


TST126: 


MOV #126,R0 s;LOAD KO WITH TEST NUMBER 
1$: ccc :MAKE N:C = 0000 
2$: 
BGE TS1127 3: TEST THE BGE-I1T SHOULD BR 
3$: HALT ;BGE FAILED 
BR 1$ ;ERROR LOOP RETURN 
sp eteneerererererereraneesererenereeeneneneneneaenenentereeseneee 
s*TEST 127 BASIC BGE TEST WITH N,v = 01 


sp eeeeeerererreseerereerererenerereterenetanreteneneneseneretenete 


1$1127: 


MOV #127,R0 7;LOAD RO WITH TEST NUMBER 
i$: ccc ;CLEAR FLAGS 
SEV ;MAKE N,V = 01 
es: BGE 3$ TEST THE BGE-1T SHOULDN'T BR 
BR 181130 3:G0 TO NEXT TEST 
3$: HALT ;BGE FAILED 
BR 1$ ;ERROR LOOP RETURN 


Sp eeeeeeveeseseverecereceeresersesesereseeeeseseasssesneeseseneees 


SEQ 0075 
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1130 BASIC BGE TEST WITH N,v = 10 SEQ 0074 

3806 :*TEST 130 BASIC BGE TEST WITH N,v = 10 
3807 ppeeeereerererereerererererererereetreereeeeeerenerenereneeeeeETs 
3808 011040 181130: 
$H4 011940 012700 000130 MOV #130,R0 7;LOAD RO WITH TEST NUMBER 
3811 011044 000257 1$: ccc ;CLEAR FLAGS 
sare 011046 000270 SEN ;MAKE N,V = 10 
3814 011050 002001 2$: BGE 3$ ;TEST THE BGE-1T SHOULDN'T BR 
Sie 011052 000402 BR 7$1131 3:60 TO NEXT TEST 
3817 011054 000000 3$: HALT ;BGE FAILED 
atts 011056 000772 BR 1$ sERROR LOOP RETURN 
3820 pLeeeeeeerereeerereerertereereeeeeeeeeeeeeeeeeeeereneeeeeeretenee 
3821 :*TEST 131 BASIC BGE TEST WITH N,v = 11 
3822 ppeeeeererererereeeeerererertererereeetenereneeeetenterenereneeee 
3823 011060 TST131: 
434 011060 012700 000131 MOV #131,R0 7;LOAD RO WITH TEST NUMBER 
3826 011064 000257 1$: CCC ; CLEAR FLAGS 
off 011066 000272 272 sMAKE N,V = 11 
3829 011070 2$: 
$34 011070 002002 BGE 181132 3; TEST THE BGE-1T SHOULD BR 
3832 011072 000000 3$: HALT ;BGE FAILED 
$44 011074 000773 BR 1$ ;ERROR LOOP RETURN 
3835 ppt eeeeeeeverererrerererereerererererttreeneneteeereeeeeeree ees 
3836 r*TEST 132 BASIC BLT TEST WITH N,v = 00 
3837 ppetteeenereeeereeererererertiterertereeretereneeeeeeteeneeeeeese 
3838 011076 181132: 
44 011076 012700 000132 MOV #132,R0 7;LOAD RO WITH TEST NUMBER 
381 011102 000257 1$: CCC :CLEAR FLAGS 

4 
3843 011104 002401 2$: BLT 3$ ;TEST THE BLT-I1T SHOULDN'T BR 
Se 011106 000402 BR 181133 3:G0 TO NEXT TEST 

4 
3846 011110 000000 3$: HALT :BLT FAILED 
94 011112 000773 ak 1$ ERROR LOOP RETURN 
seco ppeeeeertenererrerteetertereeetereereeereneteeeeetineeeeeetreeeee 
3850 s*TEST 133 BASIC BLT TEST WITH N,v = 01 
3851 ppeeeeeeenrererereereretreereteteeeereteteeeeereeteeeeeeee ETE E® 
3852 011114 181133: 
ad 011114 012700 000133 MOV #133,R0 >;LOAD RO WITH TEST NUMBER 

4 

3855 011120 000257 1$: CCC sCLEAR FLAGS 
$4 011122 000262 SEV ;MAKE N,v = 01 
3858 011124 2$: 
444 011124 002402 BLT 181134 :; TEST THE BLT=-1T SHOULD BR 

6 
3861 011126 000000 3$: HALT sBLT FAILED | 


K 6 


CQKDA-D KDI1-K BASIC LOGIC TESTS MACY11 350A(1052) 11-SEP-79 13:53 PAGE 76 

CQKDAD.P11 11-SEP-79 13:31 1133 BASIC BLT TEST WITH N,v = 01 
cet 011130 000773 BR 1$ sERROR LOOP RETURN 
3864 Pp teeeeeerrererererererrrererrrerererreereneteeteneenereereeTteee 
3865 s*TEST 134 BASiC BLT TEST WITH N,V = 10 
3866 pptrereerrerererrerrerererererrereererereeeeretereeeeeKeteeeTere 
3867 11°32 TS1134: 
oo] 0111352 012700 000134 MOV #134 ,R0 ;;LOAD RO WITH TEST NUMBER 
3870 011136 000257 1$: ccc > CLEAR FLAGS 
ffl 011140 000270 SEN ;SET N= N,v = 10 
3873 011142 2$: 
>the 011142 002402 BLT 181135 :;TEST THE BLT-1T SHOULD BR 
3876 011144 000000 3$: HALT ;BLT FAILED 
con 011146 000773 BR 1$ ERROR LOOP RETURN 
3879 preteen reererreeerertetererertetereeeeeteeeeNeeeeteeeetereeet 
3880 s*TEST 135 BASIC BLT TEST WITH N,v = 11 
3881 pptteeererererterrrerereetereerererertererereeeeneeeeeeereneeenee 
3882 011150 1$1135: 
oot 011150 012700 000135 MOV #135,R0 ;;LOAD RO WITH TEST NUMBER 
3885 011154 000257 1$: ccc CLEAR FLAGS 
sone 011156 000272 272 :MAKE N,V = 11 
3888 011160 002401 2$: BLT 3$ : TEST THE BLT-1T SHOULDN'T BR 
44 011162 600402 BR 181136 3:GO0 TO NEXT TEST 
3891 011164 000000 3$: HALT ;BLT FAILED 
443 011166 000772 BR 1$ ERROR LOOP RETURN 
3894 ppeeeeereererererreerereeeeerertreteeee eee eee eee eee 
3895 s*TEST 136 BASIC BGT TEST WITH Z = 1 AND N,v = 01 
3896 ppteeeeererrerererrererereretreneeeeeeKeReee eee Ree eee 
3897 011170 1$1136: 
404 011170 012700 000136 MOV #136,R0 ;;LOAD RO WITH TEST NUMBER 
3900 011174 000257 1$: ccc CLEAR FLAGS 
404 011176 000266 266 :SET Z AND V 
3903 011200 003001 2$: BGT 3$ TEST THE BGT-IT SHOULDN'T BR 
Sone 011202 000402 BR 181137 ::GO TO NEXT TEST 
3906 011204 000000 3$: HALT ;BGT FAILED 
aad 011206 000772 BR 1$ ERROR LOOP RETURN 
Sone ppeeeeereeeereretererereteeeeeeeee etree eee eee eee eee TES 
3910 s*TEST 137 BASIC BGT TEST WITH 2 = 0 AND N,v = 01 
3911 ppeeeeeeererereererereereeteeee tere e eee eee eee AeA EAE 
3912 011210 1$1137: 
4h, 011210 012700 000137 MOV #137,R0 ;;LOAD RO WITH TEST NUMBER 

4 

3915 011214 000257 1$: ccc CLEAR FLAGS 
3916 011216 000262 SEV :SET V 





L 6 
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CQKDAD.P11 11-SEP-79 13:31 1137 BASIC BGT TEST WITH Z = 0 AND N,v = 01 SEQ 0076 

3918 011220 003001 2$: BGT 3$ ;TEST THE BGT-1T SHOULD NOT BR 
44 011222 000402 BR T$1140 3:60 TO SCOPE LOOP EXIT 
3921 011224 000000 3$: HALT ;BGT FAILED 
3056 (11226 000772 BR 1$ sERROR LOOP RETURN 
3924 spteerereretereerererrrrereretetrertttteeeeneneeeeeReReetereeeeee 
3925 :*TEST 140 BASIC BGT TEST WITH Z = 1 AND N,V = 00 
3926 ppteeeeeeerireerereteeereneretererererereeeeeneeteneeeteneeeeeeee 
3927 011230 781140: 
4434 011230 012700 000140 MOV #140,R0 3;LOAD RO WITH TEST NUMBER 
3930 011234 000257 1$: ccc ;CLEAR FLAGS 
$053 011236 000264 SEZ SET 2 
3933 011240 003001 2$: BGT 3$ ; TEST THE BGT-1T SHOULD NOT BR 
3056 011242 000402 BR TST141 3:;G0 TO SCOPE LOOP EXIT 
3936 011244 000000 3$: HALT ;BGT FAILED 
aed 011246 000772 BR 1$ ;ERROR LOOP RETURN 
3939 tra 05 aaa telbn taplee ant 4-O-glalrttcagemalal ag henle ig igiilal tela etai ani 
3940 s*TEST 141 BASIC BGT TEST WITH Z = 0 AND N,v = 00 
3941 eee ee eee eee eee eee eee eee eee eee eee ee eAKeeeeeKeKeeeeet eee ee ee 
3942 011250 1$1141: 
coz 011250 012700 000141 MOV #141,R0 >;LOAD RO WITH TEST NUMBER 

dy 
oH 011254 000257 1$: ccc ;CLEAR FLAGS 
3947 011256 2$: 
Sect 011256 003002 BGT TST142 3;TEST THE BGT - IT SHOULD BR 
3950 011260 000000 3$: HALT ;BGT FAILED 
404) 011262 000774 BR 1$ ;ERROR LOOP RETURN 
Sect ppeeeereereeerererererettereeteereeetetee eee eK AAT eee K eee ETS 
3954 s*TEST 142 BASIC BGT TEST WITH Z = 1 AND N,V = 01 
3955 ppteeeeeeeererreretteeertreereeee eee teeter e eee eee Kee ETE 
3956 011264 TS1142: 
4444 011264 012700 000142 MOV #142,R0 ;;LOAD RO WITH TEST NUMBER 
3959 011270 000257 1$: ccc ;CLEAR FLAGS 
Sent 011272 000266 266 ;MAKE N,V = 01 AND Z = 1 

6 
3962 011274 003001 2$: BGT 3$ 7 TEST THE BGT-1T SHOULDN'T BR 
cer 011276 000402 BR 1$1143 3:60 TO NEXT TEST 

64 
3965 011300 000000 3$: HALT ;BGT FAILED 
3966 011302 000772 BR 1$ sERROR LOOP RETURN 
ese4 ppeeeeerrerereerereeerereeeeetettteeeteteteeeeA ere TATE 
3969 seTEST 143 BASIC BGT TEST WITH Z = 1 AND N,V = 10 
3970 ppeeeeenereeereeeeeereeet terete eter rete e eee eee TATA TET 
3971 011304 181143: 
3972 011304 012700 000143 MOV #143,R0 ;;LOAD RO WITH TEST NUMBER 





Mm 6 
. TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 78 


CQKDA-D KD11-K BASIC LOGIC 
CQKDAD.P11 11-SEP-79 13:31 1143 BASIC BGT TEST WITH Z = 1 AND N,v = 10 SEQ 0077 
3974 011310 000257 1$: ccc sCLEAR FLAGS 
4 bg 011312 000274 274 ;MAKE Z = 1 AND N,V = 10 
3977 011314 003001 2$: BGT 3$ ;TEST THE BLT-IT SHOULDN'T BR 
ad 011316 000402 BR TST144 360 TO NEXT TEST 
3980 011320 000000 3$: HALT sBLT FAILED 
308) 011322 000772 BR 1$ sERROR LOOP RETURN 
3983 ppeteeererereerereereererrererererererenteneeeeeeereneeeeeeeeeete 
3984 s*TEST 144 BASIC BGT TEST WITH Z = 1 AND N,V = 11 
3985 ppeeeeeeereeeereeerereeereereeererereeeeeeteeeeeeeeenenenenerenes 
3986 011324 TST144: 
Hath 011324 012700 000144 MOV #144,R0 ;;LOAD RO WITH TEST NUMBER 
3989 011330 000257 1$: ccc ;CLEAR FLAGS 
44) 011332 000276 276 sMAKE Z = 1 AND N,V = 11 
3992 011334 003001 2$: BGT 3$ ; TEST THE BGT-I]T SHOULD NOT BR 
oar 011336 000402 BR TST145 3:;G0 TO NEXT TEST 
3995 011340 000000 3$: HALT ;BLT FAILED 
sonr 011342 000772 BR 1$ ;ERROR LOOP RETURN 
3998 ppeeeeeeerereerrereeeereetetetererereeeeteeeeeeeeeeeee etree A Tee 
3999 s*TEST 145 BASIC 6GT TEST WITH Z=0 AND N,vV=11 
4000 ppeeeeeeeeeeeereeereeeereeeeeeeeeeeeeTAneteeAeeeeeeeAeeeeeeee eee 
4001 011344 TST145: 
“ot 011344 012700 000145 MOV #145,R0 3;LOAD RO WITH TEST NUMBER 
40046 011350 000257 1$: ccc ;CLEAR FLAGS 
4005 011352 000272 272 ;MAKE N:C=1010 
4006 
4007 011354 2$: 
ress 011354 003002 BGT TS1T146 3: TEST THE BGT - IT SHOULD BR 
4 
4010 011356 000000 3$: HALT ;BGT FAILED 
rr th 011300 000773 BR 1$ ;ERROR LOOP RETURN 
re Ht | jp eeeneeeccccecccccccecacecccecerrersceaeensnegensesncceaserssese 
4014 s*TEST 146 BASIC BHI TEST WITH Z,C = 00 
4015 pe eeeeteeeeeeereeeeereetertereeeetteeeeKe eee Eee eR TRA Ke NEAT 
4016 011362 TST146: 
rr HH 4 011362 012700 000146 MOV #146,R0 :;LOAD RO WITH TEST NUMBER 
4 
4019 011366 000257 1$: ccc sMAKE Z,C = 00 
4020 
4021 011370 2$: 
st 011370 101002 BH! TST147 3: TEST THE BHI-1T SHOULD BR 
4 
4024 011372 000000 3$: HALT ;BHI FAILED 
4025 011374 000774 BR 1$ ;ERROR LOOP RETURN 
ret gs PEOSSEOSSESESOSCSSCCORORCTESTEseReeeTeseDERERsaRESEeseNERSOEE 
4028 z*TEST 147 BASIC BHI TEST WITH Z,C = 01 
4029 ppeeeeeeteteereneteteeterererereeeeteeereeereeeeeKeeeeTererenees 
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CQKDAD.P11 11-SEP-79 13:31 1147 BASIC BHI TEST WITH Z,C = 01 SEQ 0078 
4030 011376 TST147: 
ret 011376 012700 000147 MOV #147,R0 7;LOAD RO WITH TEST NUMBER 
4033 011402 000257 1$: ccc CLEAR FLAGS 
ret 011404 000261 SEC sMAKE Z,C = 01 
4036 011406 101001 2s: BHI 3$ ; TEST THE BHI-1T SHOULD NOT BR 
me tt 011410 000402 BR T$1150 7:60 TO NEXT TEST 
4039 011412 000000 38: HALT BHI FAILED 
MP 011414 000772 BR 1$ ERROR LOOP RETURN 
4042 peererererrrrreererererreererererettreeeeeeeterereteteteeeneeee 
4043 TeTEST 150 BASIC BHI TEST WITH Z,C = 10 
4044 peterereretertererererrererererterererereeeeeeeeeeNeeeee renee 
4045 011416 181150: 
rte 011416 012700 000150 MOV #150,R0 ;;LOAD RO WITH TEST NUMBER 
4048 011422 000257 1$: ccc ;CLEAR FLAGS 
pe 011424 000264 SEZ sMAKE Z2,C = 10 
4051 011426 101001 2$: BHI 3$ 7 TEST THE BHI-1T SHOULD NOT BR 
me oy 011430 000402 BR TST151 3:G0 TO NEXT TEST 
4054 011432 000000 3$: HALT ;BHI FAILED 
pr ot 011434 000772 BR 1$ ;ERROR LOOP RETURN 
“os? pieeerereerrererreeteeeterereereteteeeeeReKeK Kee eee RATER eee 
4058 3*TEST 151 BASIC BHI TEST WITH Z,C = 11 
4059 ppeteeeeeeeerererreetterreeereterereereeteeeeeeeNT AERA ETE 
4060 011436 TST151: 
rat 011436 012700 000151 MOV #151,R0 3:LOAD RO WITH TEST NUMBER 
4 
4063 011442 000257 1$: ccc ;CLEAR FLAGS 
ae 011444 000265 265 sMAKE 7Z,C = 11 
4 
4066 011446 101001 2$: BHI 3$ TEST THE BHI-1T SHOULDN'T BR 
nee 011450 000402 BR TST152 3;G0 TO NEXT TEST 
4 
4069 011452 000000 3$: HALT ;BHI FAILED 
eth 011454 000772 BR 1$ s;ERROR LOOP RETURN 
ry pptteeereeeeeeeeeeeeeeteteeeee eee TTA e eee eee eRe eK A eee eee 
4073 s*TEST 152 BASIC NEG MODE 0 TEST : CDEST) GT 0 
4074 peeeeeeteeteeteterteteteneree errr e eee eee eee eee 
4075 011456 181152: 
4076 011456 012700 000152 MOV #152,R0 7;LOAD RO WITH TEST NUMBER 
4077 011462 012704 177776 MOV #-2,R4 sRESULT S / B = 177776 
4078 011466 012703 000002 1$: MOV #2,R3 sINITIAL CDESTJ = 2 
4079 011472 000257 ccc CLEAR FLAGS 
ry] 011474 000266 266 MAKE N:C = 0110 
4 
ry 011476 005403 2$: NEG R3 TEST THE NEG 
4 
4084 011500 100003 BPL 3$ 


4085 011502 001402 BEQ 3% DID N:C = 1001? 


CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 11-SEP-7 
4086 011506 102401 
4087 011506 103402 
4088 
4089 011510 000000 
4090 011512 000765 
4091 
4092 011514 020504 
4093 011516 001402 
4094 
4095 011520 000000 
4096 011522 000761 
4097 
4098 
4099 
4100 
4101 011524 
4102 011524 012700 
4103 011530 012704 
4104 011534 012702 
4105 011540 012712 
4106 011544 000257 
4107 
4108 011546 162737 
4109 
4110 011554 020412 
4111 011556 001403 
4112 011560 011203 
4113 011562 000000 
4114 011564 000765 
4115 
4116 
4117 
4118 
4119 011566 
4120 011566 012700 
4121 011572 012737 
4122 011600 012703 
4123 011604 000257 
4124 
4125 011606 163703 
4126 
4127 011612 020403 
4128 011614 001402 
4129 
4130 011616 000000 
4131 011620 000767 
4132 
4133 
4134 
4135 
4136 011622 
4137 011622 012700 
4138 011626 010605 
4139 011630 010506 
4140 011632 012703 
4141 011636 012746 


000153 


000004 


000002 


000154 
090002 
000004 


063312 


063312 


063312 
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1152 BASIC NEG MODE O TEST : COEST) GT O 


BvS 3$ 
BCS 4$ 
38: HALT ;NEGATE FAILED TO ALTER CODES PROPERLY 
BR 1$ sERROR LOOP RETURN 
4%: CMP R3,R4 ;CORRECT RESULT? 
BEQ T$1155 :;BR IF YES 
5$: HALT ;NEG DELIVERED WRONG RESULT 
BR 1$ ERROR LOOP RETURN 


jp ereerererereererereerrererereererereerereneeetenenaeaeeeareeteeTe 


s*TEST 153 BASIC ‘SUB #,a#"’ TEST 


pp eeeeeererererrererererereneeeteetereereneeneneeeeeneetenterenes 


T$1153: 


MOV #153,R0 7;LCAD RO WITH TEST NUMBER 
MOV #2,R4 ;RESULT S / B = 2 
MOV #MBUFO,R2 ;R2 POINTS TO DEST 
1$: MOV #4, (R2) sINITIAL CDOESTJ = 4 
ccc ;CLEAR FLAGS 
23: SUB #2, a#MBUFO ;TEST THE SUB 
CMP R4,(R2) ;RESULT=2? 
BEQ 181154 7;BR IF YES 
MOV (R2),R3 3;GET WAS DATA 
3$: HALT 3SUB DELIVERED WRONG RESULT 
BR 1$ sERROR LOOP RETURN 


ppeeeeeerrrrrrererereseereeereneetereeeeAneeeneeeneneeeeeeA ees 


;*TEST 154 BASIC “SUB a#,RN'’ TEST 


syeeeeererererererererieereeereneneneeeneneneeeeneneeeeeeeeAA eee 


181154: 


MOV #154,R0 : LOAD RO WITH TEST NUMBER 
MOV #2,a#MBUFO SRC = 2 
1$: MOV #4 ,R3 INITIAL CDESTJ = 
ccc SCOPE SYNC 
2$: SUB aaMBUFO,R3 ;TEST THE SUB 
CMP R4 RS RESULT=2? 
BEQ T$T155 ;;BR IF YES 
3$: HALT ;SUB DELIVERED WRONG RESULT 
BR 1$ ERROR LOOP RETURN 
speweeeeererererereretertrtereeteetrreereeeeereteneenerererereres 
:*TEST 155 BASIC “'RTS RN’’ TEST = <N:C> = 1111 


s,eeaereereserreseeerereererecerreneeesenesenseeeteeeseeseesesese 


151155: 


MOV #155,R0 i, +. WITH TEST NUMBER 
MOV SP,R5 :SAVE S 
1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
MOV #4$,R3 :RTS SHOULD LOAD PC FROM (R3) 
MOV #-1,-(SP) 7RTS SHOULD LOAD R3 FROM STACK 


SEQ 0079 


COKDA-D KD11-K BASIC ge! € TESTS 


CQKDAD.P11 11-SEP-79 
4142 011642 000277 
4144 011644 000205 


4146 011646 000000 
4147 011650 000767 


4148 

4149 011652 100003 
4150 011654 001002 
4151 011656 102001 
4152 011660 103402 
4153 

4154 011662 000000 
4155 011664 000761 
4156 

4157 011666 020327 
4158 011672 001402 
4159 

4160 011674 000000 
4161 011676 000754 
4162 

4163 011700 020506 
4164 011702 001402 
4165 

4166 011704 000000 
4167 011706 000750 
4168 

4169 

4170 

4171 

4172 011710 

4173 011710 012700 
4174 011714 010605 
4175 011716 010506 
4176 011720 012746 
4177 011724 000257 
4178 

4179 011726 000207 
4180 

4181 011730 000000 
4182 011732 000771 
4183 

4184 011734 020605 
4185 011736 001402 
4186 

4187 011740 000000 
4188 011742 000765 
4189 

4190 

4191 

4192 

4193 011744 

4194 011744 012700 


0 
0 

4196 011750 032737 
011756 001401 


15:51 


177777 


000156 


011734 


000157 
000010 063234 


c 7 
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CY 
1155 BASIC “RTS RN’ TEST = <N:C> = 11 SEQ 0080 
$cc gN:C = 11997 
23: RTS R3 :TEST THE RTS = GO TO 4$ 
3$: HALT sRTS FAILED TO LOAD THE PC 
be 1% ;LOCK ON ERROR 
4%: BPL 5$ yN:C = 11191 ? 
BNE 5$ 
BvCc 5$ 
BCS 6$ 
5$: HALT ;RTS ALTERED CODES - CLEARED ONE 
BR 1$ ;LOCK ON ERROR 
6$: CMP R3,a-1 7D1D R3 GET LOADED FROM STACK ? 
BEQ 8% ;BR IF YES 
7$: HALT ;RTS FAILED TO LOAD REG 
BR 1$ ;LOCK ON ERROR 
8$: CMP R5,SP ;D1D RTS POP THE STACK POINTER ? 
BEQ TS1156 7;BR IF YES 
9$: HALT ;RTS FAILED TO POP SP 
BR 1$ ;LOCK ON ERROR 
ppteerereerreeereeererererrenerenereeereneeaeereeeKenereneeene eee 
s*TEST 156 BASIC ‘'RTS PC‘ TEST 
“eae eeeeeeeeeeeeeeeeeeeeeeeereeeeeaeRaekteeeeetaeteretaeteteetese 
11156: 
MOV #156,R0 ;;LOAD RO WITH TEST NUMBER 
MOV SP,R5 :SAVE THE ORIGINAL SP 
1$: MOV R5,SP sRESET SP FOR ERROR LOOP 
MOV #4$,-(SP) ;PUSH NEW PC ON STACK 
ccc ;SCOPE SYNC 
23: RTS PC ;TEST THE RTS = GO TO 4$ 
3$: HALT ;RTS FAILED TO LOAD PC 
BR 1$ sLOCK ON HARD ERROR 
4$: CMP SP,RS ;D1D SP GET POPPED ? 
BEQ 181157 7;BR IF YES 
5$: HALT :RTS FAILED TO UPDATE SP 
BR 1$ sLOCK ON HARD ERROR 
sp eeeeeereerrrerereereeresseseeresererseneaeeasenenasesenereaeeT?e 
p*TEST 157 BASIC ‘USR PC,a#A"’ TEST 
speeereeereeerererererrererenerrerereneeeenenenerarenenseseeeeeee 
1S1157: 


MOV #157,R0 LOAD RO WITH TEST NUMBER 
-SBTTL USER CONTROLLED BREAKPOINT: -- BIT3 

BIT #B11T3,a#BPTLOC ;BREAKPOINT HALT SET ?? 

BEQ +4 :BR IF NOT 


CQKDA-D KD11-K BASIC LOGIC TESTS 
CQKDAD.P11 11-SEP-79 15:31 
4198 011760 000000 
4199 011762 010605 
4200 011764 010506 
rH 011766 000257 
4205 011770 004737 012000 
4204 
4205 011774 000000 
4206 011776 000772 
4207 
4208 012000 022726 011774 
4209 012004 001402 
4210 
4211 012006 000000 
4212 012010 000765 
4213 
4214 
4215 
4216 
4217 012012 
4218 012012 012700 000160 
4219 012016 010605 
4220 012020 010506 
4221 012022 012746 000357 
4222 012026 012746 012046 
4223 012032 005037 177776 
4224 012036 000257 
4225 
4226 012040 000002 
4227 
4228 012042 000000 
4229 012044 000765 
4230 
4231 012046 013702 177776 
4232 012052 022702 000557 
oser 012056 001404 
4 
4235 012000 010237 177776 
4236 012064 000000 
4237 012066 000754 
4238 
4239 012070 020605 
4240 012072 001402 
4241 
4242 012074 000000 
4243 012076 000750 
4244 
4245 
4246 
4247 
4248 012100 
4249 012100 012700 000161 
4250 012104 010605 
46251 012106 010506 
4252 012110 005046 
42535 012112 012746 012130 
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USER CONTROLLED BREAKPOINT -- BITS SEQ 0081 
HALT ;BREAK = DEPRESS CONTINUE TO RESTART 
MOV SP,RS ;SAVE ORIGINAL SP 
1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
ccc ;SCOPE SYNC 
2%: JSR PC,a#4$ ; TEST THE JSR - GO TO 4$ 
3$: HALT 7 JSR FAILED TO LOAD PC 
BR 1$ ;LOCK ON HARD ERROR 
4%: CMP #3$,(SP)+ ;D1D JSR SAVE OLD PC ON STACK ? 
BEQ 181160 :;BR IF YES 
5$: HALT 7 JSR FAILED TO SAVE OLD PC 
BR 1$ :LOCK ON HARD ERROR 
pp, eeeeeerererrereeererreretreetrereeeeeeeneReeeeeeneeeneeeenteeee 
;*TEST 160 BASIC ‘'RT1"* TEST - N:C=0000 
pp eeererererererererererererrertererereeteeeeeneneaneeereeeeeTeee 
TST160: 
MOV #160,R0 3;LOAD RO WITH TEST NUMBER 
MOV SP,R5 ;SAVE THE SP 
1$: MOV R5,SP sRESET THE SP FOR ERROR LOOP 
MOV #357,-(SP) NEW PS = 357 
MOV #4$,-(SP) sNEW PC = 4$ 
CLR aePSw MAKE [Psw) = 000 
ccc ;MAKE N:C= 0000 
2$: RT] ; TEST THE RTI - GO TO 4$ 
3$: HALT ;RTI1 FAILED TO LOAD PC 
BR 1$ ;LOOP ON HARD ERROR 
4$: MOV aaPSw,R2 :SAVE THE CPSwJ IN R2 
CMP #357,R2 sWAS CPSW] = 357 
BEQ 6$ ;BR IF YES 
MOV R2,a#PSwW ;RESTORE THE ERROR PSwW 
5$: HALT sRTI FAILED TO LOAD PSw 
BR 1$ sLOCK ON HARD ERROR 
6$: CMP SP,R5 ;D1D SP GET UPDATED OK ? 
BEQ TST161 > BR IF YES 
7$: HALT sRT1 FAILED TO UPDATE THE SP 
BR 1$ ;LOCK ON HARD ERROR 
pe eteeetererrereeerereeererererereteeeererereneeeeeeeAeeeereAee ee 
s*TEST 161 BASIC ‘'RT1"’ TEST WITH N:C=1111 
si eeeretereresererererererereeeereteereeAenenenaeeeeeeeeeeeeAA ee 
TST161: 
MOV #161,R0 3;LOAD RO WITH TEST NUMBER 
MOV SP.R5 ;SAVE THE SP IN R5 
1$: MOV RS,SP ;RESET SP FOR ERROR LOOP 
CLR -(SP) = NEW PSw = 000000 
MOV #4$,-(SP) sNEW PC = 4% 


CQKDA-D KDI1-K BASIC LOGIC TESTS 


CQKDAD.P11 
4254 012116 
4255 012124 
4256 
4257 012126 
4258 
4259 012130 
4260 012134 
4261 012140 
4262 
4263 012142 
4264 012146 
4265 012150 
4266 
4267 
4268 
4269 
4270 012152 
4271 012152 
4272 012156 
4273 012160 
4274 012162 
4275 012170 
4276 012176 
4277 012204 
4278 012210 
4279 
4280 012212 
4281 
4282 012214 
4283 012216 
4284 
4285 012220 
4286 012224 
4287 012230 
4288 
4289 012232 
4290 012236 
4291 012240 
4292 
4293 012242 
4294 012246 
4295 
4296 012250 
4297 012254 
4298 012256 
4299 
4300 012260 
4301 012262 
4302 
4303 012264 
4304 012270 
4305 012272 
4306 
4307 
4308 
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012737 
000240 


000002 


013702 
022702 
001404 


010237 
900000 
000756 


000000 
000760 


013702 
022702 
001404 


010237 
000000 
000747 


022726 
001404 


010237 
000000 
000740 


005726 
001404 


010237 
000000 
000732 


000357 


177776 


000000 


177776 


000162 


012220 
000357 
177777 
177776 


177776 
000357 


177776 


012214 


177776 


177776 


177776 


000020 
000022 
177776 


MACYII 3 
1161 


2%: 
4%: 


3$: 


- 
OA(1052) 11-SEP-79 13:53 PAGE 83 


BASI 


asPsw,R2 
#0,R2 
TST162 
R2,a#PSwW 
1$ 


C RTI’ TEST WITH N:C=11T1 
#357 ,aePSw 


;MAKE OLD PSw = 357 
;SCOPE SYNC 


;TEST THE RTI = GO 10 4$ 


:GET THE PSw 
;WAS CPSwJ=000 
7;BR IF YES 


;RESTORE ERROR PSW 
RTI FAILED TO CLEAR PSw 
;LOCK ON HARD ERROR 


-*@eeeeereteeereeereeeereteteteeeeeeeeereneteeeeteeeeneteeeeeeneese 


BASIC “iOT'’ TEST -VERIFY LOADING PSW WITH 357 


;*TEST 162 


**@eeeeeeeeetereteetereteeeeereeteteeetereektekeeeeeteteeeeeeteteee 


181162: 


1$: 


2$: 
$$: 


4$: 


5$: 


o$: 


7$: 


8$: 


9$: 


#-1,-2(SP) 


aaPSwW 


1$ 
a#PSwW,Re 
#357,R2 
6% 
R2,a#PSW 
1$ 
#3%,(SP)+ 
8$ 


R2,a#PSW 
1$ 


(SP)+ 
TST163 


R2,a#PSW 
1$ 


;;LOAD RO WITH TEST NUMBER 
;SAVE THE SP 

RESET SP FOR ERROR LOOP 
;SET UP 10T VECTOR 


101 SHOULD CHANGE -1 TO 0 
;MAKE CPSW) = 000 
SCOPE SYNC 


; TEST THE 10T 


;10T FAILED TO LOAD PC 
;LOCK ON HARD ERROR 


;GET THE PSW 
;D1D 10T LOAD A 357 ? 
:BR IF YES 


;RESTORE ERROR PSW 
;10T FAILED TO LOAD PSwW 
;LOCK ON HARD ERROR 


:D1D I10T SAVE OLD PC ? 
;BR IF YES 


;RESTORE ERROR PSW 
; 101 FAILED TO SAVE OLD PC 
;LOCK ON HARD ERROR 


7DID 10T SAVE OLD PSw ? 
7:BR IF YES 


RESTORE ERROR PSW 
;101 FAILED TO SAVE OLD PSW 
;LOCK ON HARD ERROR 


sp eecerererereeereereresererereesererererenseereraesseseeeeseeees 


BASIC “1OT'’ TEST = VERIFY LINKAGE TO SCOPE SERVICE 


T*TEST 163 


sseetereerecerreresecereesereerereserssesanssseneneseneaenenesees 


SEQ 0082 





CQKDA-D KD11-K BASI 


CQKDAD.P11 


ve lokolololol—l—) 
es 
Mmroroererrr fr 
M=——S0ONN 
NoorNS 


oO 
_ 
Nm 
Ww 
™m 
a 


012326 
012332 


012334 
012336 


012340 


012404 
012406 


012410 
012414 
012420 


012422 
012426 
012430 


012432 
012436 


012440 
012444 
012446 


012450 
012452 


012454 
012460 


CL 
11-SEP-7 


012700 


000257 
000004 


005137 
001402 


000000 
000761 


010506 


000004 


000000 
000760 


013702 
022702 
001404 


010237 
000000 
000747 


022726 
001404 


010237 
000000 
000740 


005726 
001404 


010237 
000000 


0G 
9 


1¢ TESTS 
13:31 
000163 


063244 
061612 
000022 


063244 


000164 


012410 
000357 
{aha dg 


177776 
000357 


177776 


012404 


177776 


177776 


000020 


000020 
000022 
177776 


MACY11 350A(1 
1163 BASI 


TS1163: 


1$: 


2$: 


3$: 


4$: 


MOV 


Pin 
052) 11-SEP-79 13: 
C “10T" TEST - VERIF 


#163,R0 
SPLRS 


5,SP 
a#SCOFLG 


#SCOPEA,a#20 
a#22 


a#SCOFLG 
4s 


1$ 
R5,SP 


53 
Y 


PAGE 84 
LINKAGE TO SCOPE SERVICE 


:;LOAD RO WITH TEST NUMBER 

; SAVE SP 

;RESET SP FOR ERROR LOOP 

; TRAP SERVICE WILL COM ‘’SCOFLG’’ 
;SET UP I1OT VECTOR 

;SCOPE SYNC 

zs TEST THE I0T 


;SCOFLG SHOULD BECOME 000000 
;BR IF IT DID 


;101T FAILED TO LINK TO SCOPE SERVICE 
;LOCK ON HARD ERROR 


;RESET SP IN CASE OCF ERROR 


*s@@aeeeketeeteteetereretereereteteeeereeeeeaeeaeeeeeneneneeteeeeeeteee 


BASIC "‘IOT'’ TEST -VERIFY LOADING PSW WITH 357 


TeTEST 164 


sp etereeererereerineterererereterereeeeeeeeeAAeeeeeeeeeeeeeeeeeeee 


TST164: 


1$: 


2s: 
3$: 


4$: 


5$: 


6$: 


7$: 


8$: 


9$: 


#164,R0 


#357 ,a#22 
#-1,-2(SP) 


aavPSw 


1$ 
aePSw,R2 
#357,R2 
6$ 
R2,a#PSW 
1$ 
#3$,(SP)¢ 
8$ 


R2,a#PSW 
1$ 


(SP)+ 
$1165 


R2,a#PSwW 


;;LOAD RO WITH TEST NUMBER 
; SAVE THE SP 

RESET SP FOR ERROR LOOP 
;SET UP 10T VECTOR 


;101T SHOULD CHANGE -1 TO 0 
;MAKE CPSwWJ = 000 
; SCOPE SYNC 


3 TEST THE 10T 


;101 FAILED TO LOAD PC 
;LOCK ON HARD ERROR 


;GET THE PSwW 
;D1D 101 LOAD A 357 ? 
;BR IF YES 


RESTORE ERROR PSW 
;10T FAILED TO LOAD PSw 
;LOCK ON HARD ERROR 


;D1D 107 SAVE OLD PC ? 
;BR IF YES 


RESTORE ERROR PSW 
;10T FAILED TO SAVE OLD PC 
;LOCK ON HARD ERROR 


;D1D 101 SAVE OLD PSw ? 
33 IF YES 
sRESTORE ERROR PSw 

s101 FAILED TO SAVE OLD PSw 


SEQ 0085 


names aaeene yy) 















































CQKDA-D KD11-K BASIC LOGIC TEST 
CQKDAD.P11 11-SEP-79 13:31 
4366 012462 000732 
4367 
4368 
4369 
4370 
4371 012464 
4372 012464 012700 000165 
4373 012470 010605 
4374 012472 010506 
4375 012674 012737 012520 
4376 012502 005037 000022 
4377 0125 012737 000340 
4378 012514 000277 
4379 
4380 012516 000004 
4381 
4382 012520 013702 177776 
4383 012524 001404 
4384 
4385 012526 010237 177776 
4386 012532 000000 
4387 012534 000756 
4388 
4389 012536 010506 
4390 
4391 
4392 
4393 
4394 012540 
4395 012540 012700 000166 
4396 012544 010605 
4397 012546 010506 
4398 012550 005037 063236 
4399 012554 005037 000036 
4400 012560 012737 062202 
4401 012566 000257 
4402 
4403 012570 104401 
4404 
4405 012572 012737 063166 
4406 012600 012737 000340 
4407 012606 005137 063236 
4408 012612 001402 
4409 
4410 012614 000000 
4411 012616 000753 
4412 
4413 
4414 
4415 
4416 012620 
4417 012620 012700 000167 
4418 012624 010605 
4419 012626 010506 
4420 012630 012737 062040 
0 005037 000032 


000020 
177776 


000034 


000034 
000036 


000030 
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1164 BASIC ““1OT"’ TEST -VERIFY LOADING PSW WITH 357 


BR 1$ ;LOCK ON HARD ERROR 
pe eeeeererreererereererrereereererrereetereeterereeerererereeete 
*TEST 165 BASIC 101 TEST = VERIFY LOADING PSwW WITH 000 


;,erereerererererrererererereerereraireraneeneeeeeeeneaneeeeseTeee 


TST165: 


MOV #165,R0 7;LOAD RO WITH TEST NUMBER 
MOV SP,R5 ;SAVE THE SP 
1$: MOV R5,SP sRESET SP FOR ERROR LOOP 
MOV #4$,a#20 :SET UP JOT VECTUR 
CLR a#22 3 
MOV #340,a¢PSW sMAKE CPSwW) = 340 
scc sMAKE N:C=1111 
2%: 101 : TEST THE JOT 
4$: MOV aaPSw,R2 ;GET THE CPSw) 
BEQ 6$ ;BR IF CPSwJ = 000 
MOV R2,a#PSw ;RESTORE THE ERROR PSW 
3$: HALT s10T FAILED TO CLEAR THE PSwW 
BR 1$ ;LOCK ON HARD ERROR 
6$: MOV R5,SP ;RESET THE SP BEFORE CONTINUING 


sy, eeeeeeeeeereerrerererterereeateneeteneneneeeeeeeteneeAnenereres 


s*TEST 166 BASIC ‘‘TRAP’’ TEST = LINKAGE TO PRINT ROUTINE 


sp, eeeeeeereerensererereerenererenerereaereneeenentenetentereeneee 


TST166: 


MOV #166,R0 ;;LOAD RO WITH TEST NUMBER 
MOV SP,R5 SAVE THE SP 
1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
CLR a#PRIFLG s INITIALIZE TEST FLAG 
CLR a#36 >SET UP THE “‘TRAP’* VECTOR 
MOV #PRINA,a# 34 
ccc ; SCOPE SYNC 
2$: TYPE ; TEST THE TRAP 
MOV #STRAP 2834 ;SETUP TRAP VECTOR 
MOV #340 ,a# 36 
COM a#PRIFLG ;SHOULD MAKE CPRIFLG] = 000000 
BEQ 1S1167 ::BR IF IT DID 
3$: HALT ; TRAP FAILED TO LINK TO PRINT SERV. 
BR 1$ ;LOCK ON HARD ERROR 


**@eeeeeeeeteteereteeeeteeteteteeeeeeeeeeereeeeeeeeeeeeeeeateseteeese 


S*TEST 167 BASIC "EMT'’ TEST = LINKAGE TO ERROR SERVICE 


sp eeeeeerrereserersseeeeceserereseesererrenesereneaneeseeseeeaees 


151167: 


MOV #167,R0 ;;LOAD RO WITH TEST NUMBER 
MOV SP,R5 SAVE THE SP 
MOV R5,SP RESET SP FOR ERROR LOOP 
MOV + 5 leealae ;SET UP THE EMT VECTOR 

oe 











CQKDA-D KD11-K BASIC £06 


COKDAD.P11 
4422 012642 
4423 012646 
4424 
4425 012650 
4426 
4427 012652 
4428 012656 
4429 
4430 012660 
4431 012662 
4432 
4433 
4434 
4435 012664 
4436 012664 
4437 012670 
4438 012672 
4439 012700 
4440 012706 
4441 012710 
4442 
44435 012714 
4444 
4445 012716 
4446 
4447 012720 
4448 012724 
4449 
4450 012726 
4451 012730 
4452 
4453 012732 
4454 012740 
4455 
4456 
4457 
4458 
4459 012746 
4460 012746 
4461 012752 
4462 012754 
4463 012762 
4464 012770 
4465 012772 
4466 
4467 012776 
4468 
4469 013000 
4470 
4471 013004 
4472 013010 
4473 
4474 013012 
4475 013014 


11-SEP-79 


005037 
000257 


104000 


005137 
001402 


000000 
000761 


000007 


005137 
001402 


000000 
000766 


012737 
012737 


000257 
005737 


005137 
001402 


000000 
000765 


1¢ TESTS 
18; 31 


063240 


063240 


000170 


061114 
000340 


063246 


063246 


061122 
000340 


000171 


061212 
000340 


063250 


177700 
063250 


000010 
000012 


000010 
000012 


000004 
000006 
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1167 BASIC "EMT" TEST = LINKAGE TO ERROR SERVICE 


CLR Q#ERRFLG sEMT ety Witt COM CERRFLGJ 

CcCc ;SCOPE SYN 
2$: ERROR s TEST THE EMT 

COM Q#ERRFLG :D1D EMT SERV. COM ERRFLG? 

BEQ 181170 7;BR IF YES 
3$: HALT ;EMT DID NOT LINK PROPERLY 

RR 1$ ;LOCK ON HARD ERROR 
,, eeererereererererererererererererrereeeeratenaneenereeeneeretee 
s*TEST 170 BASIC TEST OF RSVD INSTR. TRAP LINKAGE 
s,eereeeerererrererereeerererereerererereneneneneeereneraeeeeeteee 
181170: 

MOV #170,k0 :;LOAD RO WITH TEST NUMBER 

MOV SP,R85 ;SAVE THE SP 


MOV #RSVTST,a#10 ;SET UP RSVD INSTR. TRAP VECTOR 
MOV #340 ,a812 


1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 

CLR OARSVFLG ; INITIALIZE TEST FLAG THAT WILL GET 
;COMPLEMENTED BY TRAP SERVICE 

ccc ; SCOPE SYNC 

2$: 000007 ;FORCE RSVD INSTR. TRAP 
COM Q#RSVFLG ;TEST FLAG SHOULD GO 10 000000 
BEQ 4% :BR IF TRAP SPRUNG 

3$: HALT 7RSVD INSTR. TRAP FAILED 
BR 1$ ;LOCK ON HARD ERROR 

4$: MOV #WRSERR ,a#10 ;SET UP RSVD INSTR TRAP VECTOR TO POINT 
MOV #340,a#12 ;TO ERROR SERVICE ROUTINE 


pp eeeeeererererereerererereeereereerententeReteneneeeteeeteneeeene 


s*TEST 171 BASIC TEST OF BUS TIMEOUT TRAP LINKAGE 


pp eeeeeeererereeererrererereterteretereneeeteentenetereneneteenee 


TST171: 


MOV #171,R0 ;;LOAD RO WITH TEST NUMBER 
MOV SP,R5 SAVE THE SP 
MOV #BETST,a#4 ;SET UP THE BUS ERROR VECTOR 
MOV #340 ,a%6 

1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 
CLR O*BERFLG SINITIALIZE TEST FLAG THAT WILL GET 

;COMPLEMENTED BY TRAP SERVICE 

ccc ;SCOPE SYNC 

2$: TST a#177700 sFORCE BUS TIMEOUT USING RO ADDR. 
COM O#BERFLG sTEST FLAG SHOULD GO 10 000000 
BEQ TST172 7;BR IF TRAP SPRUNG 

3$: HALT ;BUS ERROR FAILED TO SPRING TRAP 
BR 1$ ;LOCK ON HARD ERROR 


si eeeecececececceseressteccaterssereseeeseeesesesaseseaesesseseees 


SEQ 0085 


CQKDA-D KDII-K BASIC LOGIC TESTS 
CQKDAD.P31 11-SEP-79 13:31 
4478 
4479 
4480 013016 
4481 013016 012700 000172 
4482 013022 005067 050264 
4483 013026 005367 050260 
4484 013032 001375 
4485 013034 012737 013074 
4486 013042 012737 000340 
4487 013050 010605 
4488 013052 010506 
4489 013054 012702 177560 
“at 013060 000257 
4492 013062 005722 
4493 013064 005722 
4494 013066 005722 
4495 013070 005712 
4496 
4497 013072 000403 
4498 
4499 013074 005742 
4500 013076 000000 
4501 013100 000764 
4502 
4503 013102 012737 061220 
4504 013110 012737 000340 
4505 
4506 
4507 
4508 013116 
4509 013116 012700 000173 
4510 013122 012702 177564 
4511 013126 012704 000200 
4512 013132 005012 
4513 013134 005001 
4514 013136 000257 
4515 
4516 013140 020412 
4517 
4518 013142 001405 
4519 013144 005301 
4520 013146 001374 
4521 
4522 013150 011203 
4523 013152 000000 
4524 013154 000766 
4525 
4526 
4527 
4528 
4529 013156 
4530 013156 012700 000174 
4531 013162 012702 177564 
4532 013166 012704 000200 
4533 013172 005012 


000004 
000006 


000004 
000006 


1 7 ie A 8 
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1172 “BASIC TEST FOR ACCESSING DL11 REGISTERS SEQ 0086 


s*TES! 172 BASIC TEST FOR ACCESSING DL11 REGISTERS 
;, eeertererererererrererereereererererererereeererenenereneeneeeee 
TS1172: 
MOV #172,R0 ;;LOAD RO WITH TEST NUMBER 
CLR MBUF O ; INIT STALL COUNTER 
11$: DEC MBUFO ;COUNT THE TIMER 
BNE 118% ;BR IF NO TIMEOUT 


MOV #3$,a#4 ;SET UP BUS TIMEOUT VECTOR 
MOV #340 ,a%6 


MOV SP,RS ;SAVE TH SP 
1$: MOV R5,SP sRESET SP FOR ERROR LOOP 
MOV #RCSR,R2 3CR2] = STARTING DLi! ADDR. 
ccc : SCOPE SYNC 
2%: TST (R2)+ ;REFERENCE DL11 = RCSR 
TST (R2)+ ;REFERENCE DL11 - RDBR 
TST (R2)+¢ sREFERENCE DL11 = XCSR 
TST (R2) ;REFERENCE DL11 - XDBR 
BR 4% 3G0 TO NEXT TEST 
3$: TST =-(R2) ;BAD ADDRESS IN R2 
HALT sONE OF DL11 ADDR'S CAUSED TIME OUT 
BR 1$ ;LOCK ON HARD ERROR 
4$: MOV #BERR,aa4 7SET UP BUS ERROR VECTOR TO POINT 
MOV #340,a86 ;TO ERROR SERVICE ROUTINE 
pp eteeeeererertereteereeeereeeeeeteeesrereeeeReeeeeeeeeeReAteneeene 
s*TEST 173 BASIC TEST OF DL11 - XCSR =- READY(1) 
sp eeerererereerereerrerserretereteretereeeeneneatenenatenenenesese 
TS1173: 
MOV #173,R0 :;LOAD RO WITH TEST NUMBER 
MOV #XCSR,R2 ;DEST ADDR = XCSR 
MOV #200,R4 sRESULT S / B = 200 
1$: CLR (R2) :CLEAR CDEST) 
CLR R1 ;SET UP TIMEOUT COUNTER 
ccc ;SCOPE SYNC 
2s: CMP R4,(R2) ;TEST READY BIT - IT SHOULD BE SET 
BEQ TST174 3;:BR IF IT WAS 
DEC R1 sTICK-TOCK GOES THE TIMER 
BNE 2% ;BR IF NOT A TIMEOUT 
MOV (R2),R3 ;GET THE WAS DATA 
3$: HALT ;READY BIT IN XCSR FAILED ON A (0) 
BR 1$ sLOCK ON HARD ERROR 
sp eeertererrererereereterrereseserereeeeeeeeeneaeeeeeeneeseenAeeee 
s*TEST 174 BASIC TEST OF DL11 = XCSR = MAINT BIT (0) 
sc eeeeerererererrereeenerererenererenereneneneeeAneeneeeeeeeeeeeese 
TS1174: 
MOV #174,R0 ;:;LOAD RO WITH TEST NUMBER 
MOV #XCSR,R2 ;DEST ADDR = XCSR 
MOV #200,R4 sRESULT S / B = 200 
1$: CLR (R2) :CLEAR MAINT. BIT 


| 
| 





CQKDA-D KD11-K BASIC Loe 


CQKDAD.P11 
4534 013174 
4535 
4536 015176 
4537 
4538 013200 
4539 
4540 013202 
4541 013204 
4542 015206 
4543 
B64 
4545 
4546 
4547 013210 
4548 013210 
4549 013214 
4550 013220 
4551 013224 
4552 013230 
4553 
4554 013232 
4555 
4556 013234 
4557 
4558 013236 
4559 013240 
4560 013242 
4561 
4562 
4563 
4564 
4565 
4566 
4567 
4568 
4569 
4570 
4571 
4572 
4573 013244 
4574 013244 
4575 01325 
4576 013254 
4577 013260 
4578 013264 
4579 01327 
4580 013274 
4581 013300 
4582 
4583 013506 
4584 013310 
4585 013314 
4586 013316 
4587 013320 
4588 013322 


11-SEP-79 
000257 
020412 
001403 
011202 


000000 
000771 


001403 


011203 
000000 
000770 


—— es OO — —* 


oor -—-So COCCO+=+00 
=AGANRA WNMRMUMNN 
~ 
So 
Ww 


oooo-oO 


1¢ 7 
13:3 


000175 
177564 
000204 
000004 


000176 


0 
000004 


000006 


ESTS 
1 


000004 


pares 30A(1052) I11- seP-79° 
ccc 
2$: CMP RG, (R2) 
BEQ T$1175 
MOV (R2),R3 
3$: HALT 
BR 1$ 


7 
13:53 
BASIC TEST OF DL11 = XCSR = MAINT BIT (0) 


PAGE 88 
SEQ 0087 


; SCOPE SYNC 

7; TEST MAINT(O) 

;:BR IF MAINT BIT CLEAR 
;GET THE WAS DATA 


; CAN'T CLEAR MAINT BIT 
;LOCK ON HARD ERROR 


ppeeeeeerrerererereereeeererereeeterrerenerereeRenereeeeAeaeTerese 


s*TEST 175 BASIC TEST OF DL11 XCSR = MAINT BIT = 1 
weer eeeeeetereeeteretereetreeeeeeeeeeeeeReeeeeeeeeeeeeTeereeee 
1$1175: 
MOV #175,R0 3;LOAD RO WITH TEST NUMBER 
MOV #XCSR,R2 ;DEST ADDR = Be 
MOV #204,R4 ;RESULT S / 204 
1$ MOV #4, (R2) :SET THE MAINT. BIT 
ccc ;SCOPE SYNC 
2$ CMP R4,(R2) ; TEST MAINT.(1) 
BEQ TS1176 3;BR IF IT WAS 
MOV (R2),R3 ;GET THE WAS DATA 
3$: HALT :CAN'T SET MAINT BIT IN XCSR 
BR 1$ ;LOCK O HARD ERROR 
ppeeeeererererereretrtetererteretterereeeereteeeereTeeeeK TETAS 
TEST 176 BASIC DL11 OUT / IN ECHO TEST (MAINT MODE) 


THIS ROUTINE USES THE MAINTENANCE MODE FEATURE OF THE DL!1 TO 


;TURN AROUND A STRING OF 8 CHARACTERS 10 THE DL11. 
[OF ALTERNATING NULL / DELETE CHARS WHICH ARE NON PRINTING. 


THIS STRING CONSISTS 
THE 8 CHARS 


;ARE OUTPUT THEN READ BACK INTO A CORE BUFFER AND THEN THE INPUT AND 


OUTPUT CORE SUFFERS ARE CHECKED FOR EQUIVALENCE. 


1F AN ERROR IS DET- 


s;ECTED DURING THE COMPARISON THE ROUTINE HALTS WITH THE WAS AND S / B 


DATA IN R3 AND R4 RESPECTFULLY. 


A TIMER IS EMPLOYED TO PREVENT THE 


TEST FROM HANGING IF RECEIVER DONE DOES NOT RESPOND. 


eee eeeeeeeeeeeeeeeeereeeeeeeeeeeeekeeeeeeeeteeeeeeeteetereeeete 


181176: 
MOV #176,R0 
6$: MOV #RCSR,R2 
TSTB 2(R2) 
TSTB 2(R2) 
MOV #1BUF ,R3 
MOV #OBUF ,R4 
MOV #10,R5 
MOV #4,4(R2) 
1$: CLR R1 
MOVB (R4)+,6(R2) 
2$: TSTB (R2) 
BM] 3$ 
DEC R1 
BNE 2$ 


:;LOAD RO WITH TEST NUMBER 

:R2 POINTS TO DL11 - START ADDR 
sREFERENCE DL11 INPUT DATA BUFFER TWICE 
:10 FLUSH RCVR “DONE” BIT 

:R3 POINTS TO CORE INPUT BUFFER 

:R4 POINTS TO CORE OUTPUT BUFFER 

:RS WILL COUNT 8 CHARS OUTPUT 

s TURN ON MAINT MODE 


;R1 USED AS TIMEOUT COUNTER 
;LOAD OUTPUT BUFFER IN DL11 
;RECEIVER DONE SET ? 

;BR IF YES 

;COUNT THE TIMER 

;BR 1F NO TIMEOUT 


CQKDA-D KD11-K BASIC LOGIC 


kK 7 
OGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 89 
CQKDAD.P11 11-SEP-79 13:31 1176 


BASIC DL11 OUT / IN ECHO TEST (MAINT MODE) SEQ 0088 
4590 013324 000000 HALT 30L11 FAILED TO RESPOND IN TIME 
74 013326 000750 he 6$ s;LOCK ON HARD ERROR 
4593 013330 116223 000002 3$: MOVB 2(R2),(R3)4 ;READ THE DL11 INPUT BUFFER INTO CORE 
4594 013334 005305 DEC R5 ;COUNT ONE CHAR 
‘eee 013336 001363 BNE 1$ 7BR IF NOT DONE 8 CHARS 
4597 013340 005062 000004 CLR 4(R2) TURN OFF MAINT. MODE 
4598 013344 012705 000010 MOV #10,R5 ;RESET CHAR COUNTER 
4599 013350 012703 063266 MOV #IBUF ,R3 RESET INBUF POINTER 
ar 013354 012704 063256 MOV #OBUF ,R4 RESET OUTBUF POINTER 
4602 013360 122324 4$: CMPB (R3)4,(RG)4 ; INPUT = OUTPUT ?? 
4603 013362 001003 BNE 5$ ;BR IF NOT 
4604 013364 005305 DEC RS ;COUNT ONE CHECKED 
4605 013366 001374 BNE 4% ;BR UNTIL 8 DONE 
— 013370 000410 BR C11ST :G0 TO NEXT TEST 
4608 013372 114303 5$: MGVB =(R3),R3 sWAS DATA IN R3 [BITS 7:0) 
4609 013374 114404 MOVB -(R4) RS 7S / B DATA IN RG [BITS 7:0) 
4610 013376 042703 177400 BIC #177400,R3 STRIP OFF BITS <15:08> 
4611 013402 042704 177400 BIC #177400,R4 = 
4612 013406 000000 HALT sRECEIVED DATA NOT EQUAL TO OUTPUT DATA 
4613 013410 000717 ik 6$ LOCK ON HARD ERROR 

























t 7 

CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 90 

CQKDAD.P11 —«- 11-SEP=79 13:31 1176 =~ BASIC -DL11 OUT / IN ECHO TEST (MAINT MODE) SEQ 0089 
4614 0000000000000 OOO III IIIT IID III II II IIE 
4615 S/IITITTITLT I COMPREHENSIVE INSTRUCTION TESTS////////I/IIIITIIIITTT 
4616 00000000000 0000000000000 QOD OV IID I II I I II IIL 
4618 013412 012737 061260 000020 CITST: Mov #SSCOPE,a#20 =; SET UP I0T VECTOR 
4619 013420 005037 000022 CLR ane 
4620 013424 012737 061620 000030 MOV WSERROR,a#30 =; SET UP EMT VECTOR 
4621 013432 012737 000340 000032 MOV #340,a852 
4622 013440 012737 063166 000034 MOV #STRAP, 3834 ;SET UP TRAP VECTOR 
4623 013446 012737 000340 000036 MOV #340, 
4624 013454 012737 060664 000024 MOV SSPURDN. 0824 :SET UP POWER FAIL VECTOR 
4625 013462 012737 000340 000026 MOV #340,a#26 
4626 013470 105737 001141 TSTB) = aWSENVM ;00 NOT SIZE BIT SET? 
4627 013474 100003 BPL 3$ :BR IF NOT = USE HARDWARE SWITCH REG 
4628 013476 012737 001142 001040 MOV WSSWREG,aWSWR  :USE APT SWITCH REG. 
4629 013504 032777 010000 165326 38: BIT #SW12,aSWR : INHIBIT PRINTING INTRO. 1.D. MESSAGE? 
4630 013512 001007 BNE 1$ BR IF YES 
4631 013514 005737 063254 TST aWONCE ZFIRST TIME INTO ‘CIT’ TESTS ? 
4632 013520 001004 BNE 1$ :BR IF NOT - PRINT ID ONLY ONCE 
4633 013522 005137 063254 COM aWONCE :SET FLAG TO INHIBIT PRINTING AGAIN 
4634 013526 104401 TYPE ZIDENTIFY THIS PROGRAM 
4635 013530 065141 IDENT1 :ADDR OF THE ID MESSAGE 
4636 013532 005037 177776 1$: CLR awPSw :SET CPU PRIORITY TO LEVEL 000 
4637 013536 012737 003316 001006 MOV #TSTO,Q#$LPADR INITIALIZE SCOPE LOOP RETURN 
4638 013544 012737 000040 001110 MOV #40,aW$TIMES | :ITERATE ON BIT SECTION 32 TIMES 
4639 013552 010037 001124 MOV RO, aMSTESIN :PREVENT MISSED TEST ERROR ON 
4640 ZFIRST SCOPE CALL 
464 
4642 ;,eeeeerereeererereereereeeeeteetreteereKteekeKeenaeeeeeeteeeAAes 
4643 S*TEST 177 BCC TEST WITH C=1 
4644 sj eteeeeeeeerereeeeeeeeerereretererenteeeeeReAeekeeeeeeReteeeeeTse 
4645 013556 1$1177: 
4646 013556 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
4647 013560 012700 000177 MOV #177,R0 :;LOAD RO WITH TEST NUMBER 
4648 013564 013701 013572 MOV av2$.R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
4049 013570 000261 SEC :MAKE C=1 
46 
4651 013572 103001 28: BCC 3$ ;TEST THE BCC, IT SHOULDN'T BR 
4652 013574 000401 A BR 1$1200 ::G0 TO SCOPE EXIT 
46 
4654 013576 104005 3$: ERROR 5 :BCC FAILED 
ree $1 sp eeeeeererererererereetreereee eee ee eee Kae ee AeA TA Tee 
4657 :*TEST 200 BCC TEST WITH C=0 
4658 sy etererrrerereerereserereereeeeereteteeeeeKeeeeeeeeetenetanereeee 
4659 013600 751200: 
4660 013600 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
4661 013602 012700 000200 MOV #200,R0 [;LOAD RO WITH TEST NUMBER 
4662 013606 013701 013614 MOV a#2$.R1 [LOAD R1 WITH TEST INSTRUCTION WORD 
4663 013612 000241 CLC "MAKE C=0 
4664 
4665 013614 2$: 
4666 013614 103001 BCC $1201 ::TEST THE BCC-1T SHOULD BR 
466 : 

013616 104005 3$: ERROR § :BCC FAILED 








CQKDA-D KD11-K BASIC L 


CQKDAD.P11 


013642 
013644 
013646 
013652 
013654 


013656 


013660 


013676 
013702 
013704 
013706 
013710 
013714 
013716 


013720 


.o 


11-SEP-7 


103004 
013703 
020304 
001401 


104001 


000004 


012702 
000277 
000401 
104005 
013703 
020304 
001401 


104001 


000004 


012702 


000257 
103404 


000201 
013644 
000017 
177776 


177776 


000202 


177776 


177776 


000203 
013744 


177776 


a 7? 
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1201 VERIFY NO BRANCH MICROROUTINE DOES NOT CLR FLAGS 


-s@atererererrrererereereeeretreeerererenekeeeaeeereeeeerterereeet 


:*TEST 201 VERIFY NO BRANCH MICROROUTINE DOES NOT CLR FLAGS 


s,s, eeeeererererererererererrerenetereeeeeeeeAARaeeAeKeReeeKAAeAees 


TST201: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #201,R0 ;;LOAD RO WITH TEST NUMBER 
MOV 2#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #17,R4 :$/B PSW 
MOV #PSW,R2 :DEST = PSwW FOR ERROR CALL 
scc MAKE N:C = 1111 
2$: BCC 3$ TEST THE BCC-1T SHOULDN'T BR 
MOV asPsw,R5 GET WAS FLAGS 
CMP R3,R4 gN:C = 1111? 
BEQ TST202 ::BR IF YES 
3$: ERROR 1 3NO BRANCH MICROROUTINE ALTERED CODES 


sp eteeereeerereeereeeerereeeetreeeeeeeeeeee Kee KeKeAeeee eee ee 


s*TEST 202 VERIFY BRANCH MICROROUTINE DOES NOT CLR FLAGS 


SP RRRA ATER ARATE ATTA ET EAA A EAA AEE AA AERA AAREAAE ERATE ETE ET 


1§1202: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #202,R0 > LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #17,R4 :$/ B PSW 
MOV #PSwW,R2 ;DEST = PSW FOR ERROR CALL 
Scc sMAKE N:C = 1111 
28: BR 4% ; TEST THE BR 
3$: ERROR 5 ;JUST IN CASE THE BR DIDN'T WORK 
4$: MOV aaPsw,R3 ;GET THE FLAGS 
CMP R3,R4 sN:C = 1111? 
BEQ TS1203 3:BR IF YES 
5$: ERROR 1 sBRANCH MICROROUTINE ALTERED CODES 


TUR PEPPER ESEEESESEEESESEEESE EERE REE RRR EERE RRR R RRR R RRR R RRR RRR RAS ES SO 


S*TEST 203 VERIFY NO BRANCH MICROROUTINE DOES NOT SET FLAGS 


speeererrereeeeerrtrreeereeeeeAeeeeeeee eee Ree KEK KARA KA AKA ee 


1$1203: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #203,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 :PSw S/B = 
MOV #PSW,R2 ;DEST = PSwW FOR ERROR CALL 
ccc ;MAKE N:C = 0000 
2$: BCS 3$ TEST THE BCS=11 SHOULDN'T BR 


SEQ 0090 


COKDA-D KD11-K BASIC LOG 


CQKDAD.P11 


013746 
013752 
013754 


013756 


014004 


014006 
014012 
014014 


014016 


014020 


014026 
014032 


014034 
014036 


014040 


014042 
014042 
014044 
014050 
014054 
014056 


014060 
014060 


014062 


11-SEP-79 


012702 
000257 
000401 
104005 
013703 
005703 
001401 


104001 


000004 


000257 


003401 
000401 


104005 


000004 
012700 
013701 
000257 
000264 


003401 
104005 


000204 
014002 


177776 


177776 


000205 
014034 


000206 
014060 


Nn 7 
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1203 VERIFY NO BRANCH MICROROUTINE DOES NOT SET FLAGS 


MOV = a#PSWRS :GET FLAGS 
TST R3 N:C = 0000 
BEQ TST204 TsBR IF YES 
38: ERROR 1 ;NO BRANCH MICROROUTINE-ALTERED CODES 


pp eteeerererererrerererereeerererererereteeeaKrerHereReeeneeeeeAee 


s*TEST 204 VERIFY BRANCH MICROROUTINE DOES NOT SET FLAGS 


pp eeeeeeenerereerereeeeteteeereeereereeereeeKeKAKeAeeeAeee ATTA Te 


TST204: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #204,RO0° - LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 _ 7PSw S/B = 0 
MOV #PSW,R2 =DEST = PSw FOR ERROR CALL 
ccc ;MAKE N:C = 0000 
2$: BR 4% s TEST THE BR 
3$: ERROR 5 sJUST IN CASE THE BR DIDN'T WORK 
4$: MOV aaPsw R35 i FLAGS 
TST R3 = 0000 
BEQ TS1205 iwaR If YES 
5$: ERROR 1 :BRANCH MICROROUTINE ALTERED CODES. 


Ling cocina tag pee ea see agente cigar Weamaiets mn stint niin 


s*TEST 205 BLE TEST WITH Z = 0, AND N,V = 00 


py eeeeereeeereeeereeteeeeereere rere eee KARA KARE K AA eee TAA AAT AeA Te 


TST205: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #205,R0 >:;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITK TEST INSTRUCTION WORD 
ccc ; CLEAR FLAGS 
2$: BLE 3$ TEST THE BLE-I1T SHOULDN'T BR 
BR TS1206 3:60 TO SCOPE EXIT 
3$: ERROR 5 ;BLE FAILED 
Ppeeeeeeeredreeeeeedtreertere terete eeeee tee ee T ARETE Tee 
:*TEST 206 BLE TEST WITH Z = 1 AND N,V = 00 


speeareerrererererereretirterereetrerereeeeee Ke eeee eee eee eee 


181206: 


SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #206,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
ccc :CLEAR FLAGS 
SEZ sSET 2 = 1 
2$: 
BLE T$1207 7: TEST THE BLE-I1T SHOULD BR 
3$: ERROR 5 sBLE FAILED 


SEQ 0091 


COKDA-D KDI1-« BASIC 


CQKDAD.P11 


4793 014102 
4794 014102 


4796 014104 


4806 014122 


4808 014124 
4809 014124 


4811 014126 


4816 014130 
4817 014130 
4818 014132 
4819 014136 
4820 014142 
4821 014144 


4823 014146 
4824 014150 


4826 014152 


4831 014154 
4832 014154 
4833 014156 
4834 014162 
4835 014166 


4837 014170 


11-SEP-79 


003401 
104005 


000004 


000270 


003401 
104005 


000004 
012700 
013701 
000257 
000272 


003401 
000401 


104005 


000004 


000257 
101401 


OGIC TESTS 


ri 
13:31 


000207 
014102 


000211 
014146 
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1206 BLE TEST wiTH 2 = 1 AND WN 00 


s*TEST 207 BLE TEST WITH Z = 0 AND N,V = O01 


--@eeeneeeeerertereeererereerererererrreereeneeterteeeeeeteteteeeeeee 


1§1207: 


SCOPE ;CALL THE SCOPE LOOP UTILITY ’ 
MOV #207,R0 + LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
ccc s CLEAR FLAGS 
SEV ;MakE 2 = 0 AND N,V = 01 
2%: 
BLE T$1210 7; TEST THE BLE-IT SHOULD BR 
3$: ERROR 5 ;BLE FAILED 
pp eeeererererererererrerererereeeeerereteneteneterenenenetereneee 
s*TEST 210 BLE TEST WITH Z = 0 AND N,v = 10 


s,s, eeereeeereresererererererererererereeeeereeeeeneteneraeeeereeee 


T$17210: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #210,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
ccc ;CLEAR FLAGS 
SEN ;MAKE Z = 0 AND N,v = 10 
23: f 
BLE TST211 3; TEST THE BLE-I1T SHOULD BR 
3$: ERROR 5 ;BLE FAILED 


sp eeeeretererereerererrerrreneteeeeeneeeKaKeeneKeeneeeAAeeAeeees 


s*TEST 211 BLE TEST WITH Z = 0 AND N,V = 11 


sp eeewererererererererererereeeetretenereenenneeeReeReneeeReeeeeAe 


TST211: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #211,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
ccc ; CLEAR FLAGS 
272 MAKE Z = 0 AND N,V = 11 
2$: BLE 3$ ;TEST THE BLE-1T SHOULDN'T BR 
BR TST212 ;:;G0 TO SCOPE EXIT 
3$: ERROR 5 ;BLE FAILED 


*s@eeeeeeetereteeeetete teeter eeeeeee eee eee aeeeeneeeeeeeeeeteteene 


SeTEST 212 BLOS TEST WITH Z.C = 00 


sp eeteerrererrererereeererereeeereeeeerreAeAeeeeeeeeeeAeeeeAAAeEee 


1S1212: 


SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #212,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
ccc . MAKE Z,C = 00 
2$: BLOS 3$ ;TEST THE BLOS-1T SHOULDN'T BR 


SEQ 0092 


CQKDA-D KDI1-K 
CQKDAD.P11 


4838 014172 
4840 014174 


4845 014176 


4850 014212 


4852 014214 
4853 014214 


4855 014216 


4860 014220 


4865 014234 


4867 014236 
4868 014256 


4870 014240 


4875 014242 


4880 114256 


4882 014260 
4883 014260 


4885 014262 


4890 014264 
4891 014264 
4892 014266 
4893 014272 


BASIC 406! 1¢ TESTS 
11-SEP-79 13: 31 


000401 
104005 


000004 


000261 


101401 
104005 


000004 


000264 


101401 
104005 


000004 
012700 000215 
AE ty 014260 


000265 


101401 
104005 


3$: ERROR 5 ;BLOS FAILED 


c 8 
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1212 BLOS TEST WITH 7,C = 00 SEQ 0093 
Be 181213 3:60 TO SCOPE EXIT 
Se de ee he eee ae ee eee eee 
s*TEST 213 BLOS TEST WITH Z,C = 01 
*a@eneeceetererererereretertereeeereeeeeeeeeteeeeeeetateaeerneeeeeeeeee 
ié1213: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #213,R0 >; LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
ccc s CLEAR FLAGS 
SEC > MAKE Z1,C = 
2s: 
BLOS TS1214 3;TEST THE BLOS-IT SHOULD BR 
3$: ERROR 5 ;BLOS FAILED 
pp eeteererereerereerrererereeeeeteeererereaeareteneneeenaserarerene 
s*TEST 214 BLOS TEST WITH Z,C = 10 
pp ereeeeerrererererererrerererreretereteraneeeteratenareneteteteee 
TST214: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #214,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 
ccc :CLEAR FLAGS 
SEZ sMAKE 72,C = 10 
2$: 
BLOS TS1215 3:TEST THE BLOS-IT SHOULD BR 
3$: ERROR 5 ;BLOS FAILED 
sy teeererereerererrrereneterterererenteeereeraneaeeeeneneneneteee 
s*TEST 215 BLOS TEST WITH Z,C = 11 
sp eteeererrerererererrenesereneeretereeeeeeeeeeneReeeeeneeeeeAeee 
TST215: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #215,R0 ::LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
ccc s;CLEAR FLAGS 
265 sMAKE 2Z,C = 11 
2$: 
BLOS TS1216 7; TEST THE BLOS-1T SHOULD BR 
3$: ERROR 5 ;BLOS FAILED 
si eteeeerererersereesereererereeereseeeeeeNeeeneseeseeseeseseTenesS 
;*TEST 216 SXT MODE 0 TEST WITH N = 0 AND C = 1 
si eeeerrereerresenererererereererereseseeeeneeeeeeeeeeeAeeeeneteee 
TST216: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #216,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 


CQKDA-D KD11-K stone 


CQKDAD.P11 
4894 014276 


4899 014310 
4901 014312 


4904 0143520 
4906 014322 


4908 014324 
4909 014326 


4911 014330 


4916 014332 


4919 014340 


4921 014344 
4922 014352 
4923 014354 


4925 014356 
4926 014360 
4927 014364 


4929 014366 
4930 014370 


4932 014372 


4937 014374 
4938 014374 
4939 014376 
4940 014402 
4941 014406 
4942 014412 
49435 014414 


4945 014416 
4947 014420 


4948 014422 
4949 014424 


11-SEP- 


006703 


100403 
001002 
102401 
103401 


104002 


005703 
001401 


104002 


000004 
012700 
015701 


032737 
001401 
000000 


005004 
012703 
000257 


006703 
103001 


104002 


000004 
012700 
013701 


3 
000277 
006703 
100003 


001402 
102401 


000217 
014366 


000020 


177777 


000220 


063254 


MACY11 30A(1052) 11-SEP-79 ” 38. 75% PAGE 95 * 
1216 SXT MODE 0 TEST WITH N = J AND C = 1 

CLR RG sRESULT S$ / B= 0 

MOV #-1,R5 sINITAL DEST. OP = 177777 

ccc sCLEAR CODES 

263 zN:C = 0011 
23: SxT R3 s TEST THE SXT 

BMI 3$ 

BNE 3$ 7D1ID SXT MAKE N:C = 0101? 

BvS 3$ 

BCS 4% 
3$: ERROR 2 sSXT FAILED TO ALTER CODES PROPERLY 
4%: TST R3 7D1D RESULT = 0? 

BEQ TST217 7;BR IF IT DID 
5$: ERROR 2 7ST DELIVERED WRONG RESULT TO R3 


sp, eeerererererererrerereerereeetereeeteneereneeneeneneneeneeneTes 


s*TEST 217 SXT MODE O TEST WITH N = 0 AND C = O 


sp etereeerererrerereterereerereserererenenarenenenenereneneneseee 


TST217: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #217,R0 +: LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 ~~ TEST INSTRUCTION WORD 
.SBITL USER CONTROLLED BREAKPOINT -- BITS 

BIT #B114,a#BPTLOC ;BREAKPOINT HALT SET ?? 

BEQ +4 ;BR IF NOT 

HALT sBREAK - DEPRESS CONTINUE TO RESTART 

CLR RG sRESULT S / B= 0 

MOV #-1,R3 sINITIAL DEST OP = 177777 

CCC >CLEAR N:C 
2$: SxT R3 :TEST THE SXT 

BCC T$1220 > BR IF “"C’' STILL CLEAR 
3$: ERROR 2 sSXT AFFECTED ‘'C’’ BIT 
PPTITITITITITIITITT TTT 
s*TEST 220 SXT MODE 0 TEST WITH N = 1 AND C = 1 
sp eeeeeerererereererereererererereneneneeeeeneeeeeeeeeeeeeeeTete 
T$1220: 

SCOPE 7CALL THE SCOPE LOOP UTILITY 

MOV #22C,R0 +; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #-1,R4 RESULT § / B = 177777 

CLR R3 s INITIAL DEST OP = 0 

scc sMAKE N:C = 1111 
2$: SxT R3 :TEST THE SXT 

BPL 3$ 

BEQ 3$ sN:C = 1001? 

BvS 3% 


SEQ 0094 


ee = 


CQKDA-D KD11-K BASIC e+ € TESTS 


CQKDAD.P11 
4950 014426 
4952 014430 


4954 014432 
4955 014434 
4956 014436 


4958 014440 


4965 014442 
4964 014442 
4965 014444 
4966 014450 
4967 014454 
4968 014460 
4969 014462 
4970 014464 


4972 014466 
4973 014470 


4975 014472 


4980 014474 
4981 014474 
4982 014476 
4983 014502 
4984 014506 
4985 014512 
4986 014514 
4987 014520 
4988 014522 


4990 014524 
4992 014526 
4993 014530 
4994 014532 
4995 014534 
4997 014536 


4999 914540 
5000 014542 


5002 014544 


5004 014546 
5005 014552 


11-SEP-79 
103401 
104002 
010305 
005105 
001401 


104002 


000004 


000276 


006703 
103001 


104002 


000004 


000263 
006712 
100403 
001002 
102401 
103401 
104001 


005712 
001401 


104001 


012702 
013701 


13: 31 


000222 
014524 
063312 


177777 


063312 
014566 


E if 
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1220 SXT MODE O TEST WITH N = | AND C = 1 

BCS 4% 
3$: ERROR 2 7SKXT FAILED TO ALTER CODES PROPERLY 
4$: MOV R3,R5 ;GET RESULT 

COM R5 > COMPLEMENT IT=SHOULD GO 10 0 

BEQ TS7221 73 BR IF RESULT OF SXT = 1 
5$: ERROR 2 ;SXT DELIVERED WRONG RESULT. 
ppeereeereerrererereceereeeeerererereeeeeeeeetereeeteereeeeeteTe 
:*TEST 221 SXT MODE 0 TEST WITH N = 1 AND C = 0 


pp eeeeeeeererrrreerrerrrerrerererteeererenenrenarenereneeeeerenes 


TST221: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #221,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #-1,R4 sRESULT S / B = 177777 
CiR R3 s INITIAL DEST OP = 0 
ccc :CLEAR FLAGS 
276 sMAKE N:C = 1110 
2s: SxT R3 s TEST THE SXT 
BCC TS1222 > BR 1F “"C'’ UNAFFECTED 
3$: ERROR 2 3SKT SET “'C’’ BIT 
See ete ane ee ae ae ae 
s*TEST 222 SXT MODE 1 AND 2 TEST WITH N = O AND C = 1 
**@eereaeeeeeereeeeeeeeteeteeeeeeteteteeteeeeeeeeteeeeeeeeeeeeeeeeeeeeee 
1§1222: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #222,R0 :;LCAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, R2 ;R2 POINTS * DEST OP 
CLR RG sRESULT S / = 0 
MOV #-1,(R2) s INITIAL bes 1) = 177777 
ccc = CLEAR CODES 
263 MAKE N:C = 0011 
2$: SxT (R2) :TEST THE SXT = DMI 
BM! 3% 
BNE 3$ 3N:C = 0101 
BvSs 3$ 
BCS 4$ 
3$: ERROR 1 :SXT FAILED TO ALTER CODES PROPERLY 
4%: 1S1 (Re) ;DID RESULT = 0? 
BEQ 11% :BR IF YES 
5$: ERROR ] :SXT SHOULD HAVE ZEROED [DEST] 
118: MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV a#i2$,R1 sLOAD R1 wlTH TEST INSTR WORD 





CQKDA-D KD11-K 
CQKDAD.P11 


5006 014556 
5007 014562 
5008 014564 
009 


5010 014566 
5012 014570 


5015 014576 
5017 014600 


5019 014602 
5020 014606 


5022 014610 


5024 014612 
5025 014616 


5027 014620 


5032 014622 
5033 014622 
5034 014624 
5035 014630 
5036 014634 
5037 014636 
5038 014642 
5039 014646 


5041 014650 
5042 014652 


5044 014654 


5049 014656 
5050 014656 
5051 014660 
5052 014664 
5053 014670 
5054 014674 
5055 014700 
5056 014702 


5058 014704 


5060 014706 
5061 014710 


BASIC L 
11-SEP-7 


012712 
000257 
000263 
006722 


100403 


103401 
104001 


005737 
001401 


104001 


020227 
001401 


104001 


000004 


000257 


006712 
103001 


104001 


006712 


100003 
001402 


oo 


063312 


063314 


000223 
014650 


063312 
177777 


000224 
014704 
177777 
063312 


F 8 
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SXT MODE 1 AND 2 TEST WITH N = 0 AND C = 1 SEQ 0096 
MOV #-1,(R2) INITIAL CDESTJ = 177777 
ccc > CLEAR CODES 
263 MAKE N:C = 0011 
128: SxT (R2)¢ sTEST SXT = DM2 
BAI 7$ zN:C = 0101 ? 
BNE 7$ 
Bvs 7$ 
BCS 6$ 
7$: ERROR 1 :SXT FAILED TO ALTER CODES PROPERLY 
6$: TST aaMBuFlO :DID RESULT GET ZEROED ? 
BEQ 8$ ;BR IF YES 
9$: ERROR 1 :SXT FAILED TO ZERO CDESTJ 
8$: CMP R2,#MBUFO+2 sWAS IT REALLY MODE 2 ? 
BEQ TS1223 ;7;BR IF YES 
ERROR 1 :SXT FAILED TO AUTO INCREMEN? 
pp eeeereererrerereerrrererrrrerererreertaeeeeeeeeeReKeeeeeAee ATS 
r*TEST 223 SXT MODE 1 TEST WITH N = 9 AND C = 0 
pp eewereerererererereeererererttererereenereneneeeKenenenereeAT eS 
TS1223: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #223,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 sRESULT S / B = 0 
MOV #MBUFO,R2 :R2 POINTS TO DEST OP 
MOV #-1,(R2) sINITIAL CDESTJ = 177777 
CCC :CLEAR ‘'C’’ BIT 
2s: SXT (R2) sTEST THE SXT 
BCC TS1224 > BR IF ‘'C’* UNDISTURBED 
3$: ERROR 1 >SXT SET THE ‘'C’’ BIT 
De Ree eee eee ee eeeeeeeeeeere eee eeeeaeteneeenese 
*TEST 224 SXT MODE 1 TEST WITH N = 1 AND C = 1 


S eeeteeerereeeeeretererereeeetreeretreeeteteeeeeeeeneteeeee eee 


TST224: 


SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #224,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #-1,R4 sRESULT S / B = 177777 
MOV #MBUFO, R2 :R2 POINTS TO DEST OP 
CLR (R2) sINITIAL CDEST] = 0 
scc sMAKE N:C = 1111 
2$: SxT (R2) sTEST THE SXT 
BPL 3$ ) 
BEQ 3$ sN:C = 1001? 


CQKDA-D KD11-K BASIC L0G 


CQKDAD.P11 


5103 


014712 
014714 


014716 


014720 
014722 


014724 


014726 


014754 


014756 
014760 


014762 


014764 


015010 
615012 
015014 
015016 
015020 
015022 
015024 


015026 
015030 


015032 


11-SEP-79 


102401 
103401 


104001 


021204 
001401 


104001 - 


000004 
012700 


000276 


006712 
103001 


104001 


000303 
100403 
001002 
102401 
103001 
104002 


020403 
001401 


104002 


1€ TESTS 
13:31 


000225 
014756 
177777 
063312 


000226 
015012 
177400 
000377 


G 8 
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1224 = SXT MODE 1 TEST WITH N= | AND C = 1 

BvS 3$ 

BCS 4$ 
3$: ERROR 1 :SXT FAILED TO ALTER CODES PROPERLY 
4$: CMP (R2) RS :RESULT = 177777? 

BEQ 1$1225 :;BR IF YES 
5$: ERROR 1 ;SXT DELIVERED WRONG RESULT 
a a eae eee ee 

S*TEST 225 SXT MODE 1 TEST WITH N = 1 AND C = 0 

*“*@@aereeeererereraererrererrrerettereeetertteetaeneereneteteneeeeeeeeeee 
181225: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #225,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 [LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #-1,R4 :RESULT $ / B = 177777 

MOV #MBUFO,R2 :R2 POINTS TO DEST OP 

CLR (R2) SINITIAL [DEST] = 0 

CCC ZCLEAR FLAGS 

276 :MAKE N:C = 1110 
2$ SKI (R2) STEST THE SXT 

BCC 1$1226 :;BR 1F ‘'C'* UNAFFECTED 
3$: ERROR 1 :SMT SET THE "'C'* BIT 
spe eeeeerereeeeeerererererenetereeetereeeteneeeeeeeeeneeeeeneenese 
S*TEST 226 SWAB MODE 0 TEST WITH POS. RESULT 


sp eeeeeererererererereeenerererereeeteneeeeereteneneneenarenentene 


181226: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #226,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #177400, RG sRESULT S / B = 177400 

MOV #377,R3 sINITIAL DEST OP = 377 

CCC >CLEAR FLAGS 

273 :MAKE N:C = 1011 
2s: SWAB R3 ; TEST THE SWAB 

BM] 3$ 

BNE 3$ zN°C = 0100 

BvS 3$ 

BCC 4% 
3$: ERROR 2 ;SWAB FAILED TO ALTER CODES PROPERLY 
4%: CMP RG,R3 sCORRECT RESULT? 

BEQ 131227 > BR IF YES 
5$: ERROR 2 ;SWAB DELIVERED WRONG RESULT 
*“*‘@eneeeeeteteteeetererteteteeeereerenteeteetaeatrekhekeeweteeeeteneeeenteeeree 

SeTEST 227 SWAB MODE O TEST WITH NEG. RESULT 


' 
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SEQ 0097 
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< 
1227 SWAB MODE 0 TEST WITH NEG. RESULT Seo 0098 | 
,,eeeeerererererercerereesresererererererererereeetereeseneeeeeee 
181227: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #227,R0 *sLOAD RO WITH TEST NUMBER | 
MOV as2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #377,R4 ;RESULT S$ / B = 377 | 
MOV #177400,R3 SINITIAL DEST OP = 177400 | 
CCC “CLEAR FLAGS | 
267 “MAKE Ni( = 0111 
2s: SWAB RB :TEST THE SWAB 
BPL 3$ 
BEO 3g :DID SWAB MAKE N:C = 1000 
BvS 3$ 
BCC i$ 
3s: ERROR 2 :SWAB FAILED TO ALTER CODES PROPERLY 
4$: CMP RG,R3 :DID SWAB DELIVER CORRECT RESULT? 
BEQ 181230 >;BR if OK 
5$: ERROR 2 :SWAB DELIVERED WRONG RESULT 
sp, eeeeeerererererrerererrererereeeererenereneerenetenteneeeneeeee 
SeTEST 230 SWAB MODE 1 AND 2 TEST WITH POS. RESULT 
sc eeeeererererererrereereserererererenerenenenaeeteneeeeeeaneeeese 
1817230: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #230,R0 *;LOAD RO WITH TEST NUMBER 
MOV ae2$_R1 “LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #177400,R4 “RESULT S / B = 177600 
MOV #MBUFO,R2 ‘R2 POINTS TO DEST OP 
MOV #377, (R2) [SET UP DEST OP = 377 
CCC “CLEAR FLAGS 
273 “MAKE Ni( = 1011 
2$: SWAB (R2) :TEST THE SWAB = DMI 
BMl «38 
BNE 3% sN:C = 0100 
BVS 3$ 
BCC 4$ | 
3$: ERROR 1 :SWAB FAILED TO ALTER CODES PROPERLY 
4$: CMP RG, (R2) CORRECT RESULT? | 
BEQ 5$ “BR IF OK | 
ERROR 1 SWAB DELIVERED WRONG RESULT 
5$: Mov a#208,R1 SLOAD R1 WITH TEST INSTR. WORD | 
Moy #MBUFO,R2 “R2 POINTS TO DEST OP 
MOV #377, (R2) “(DEST] = 000377 
CCC “CLEAR FLAGS ‘ 
273 “MAKE Ni( = 1011 | 
} 
} 
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1250 SWAB MODE 1 AND 2 TEST WITH POS. RESULT 


20%: SWAB (R2)+ ; TEST THE SWAB = DM2 


BM] 7$ 3N:C = 0100 

BNE 7% 

BvS 7$ 

BCC ¢$ 
7$: ERROR 1 ;SWAB FAILED 10 SET CODES PROPE®LY 
6$: CMP R4, aeMBUFO ;CORRECT RESULT ? 

BEQ 8$ :BR IF YES 
9$: ERROR 1 ;SWAB DELIVERED THE WRONG RESULT 
8$: CMP R2,#MBUFO+2 3;D1D AUTO INCREMENT OCCUR ? 

BEQ 181231 ;;BR IF YES 

ERROR 1 ;SWAB FAILED TO AUTO INC REG. 
Ss, eeeeeraererererrereererrereerereererenereeeeReeAeeAeeneeeTeneee 
s*TEST 231 SWAB MODE 1 TEST WITH NEG. RESULT 
sp eeeereterererereerererererenterereterateeteaneneeaeenenatetenes 
TS1231: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #231,R0 >;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #377,R4 sRESULT S / B = 377 

MOV #MBUFO,R2 sR2 POINTS TO DEST OP 

MOV #177400, (R2) 7SET UP DEST. OP = 177400 

CCC ;CLEAR FLAGS 

267 sMAKE N:C = 0111 
2$: SWAB (R2) s TEST THE SWAB 

BPL 3$ 

BEQ 3% 3N:C = 1000? 

BvS 3$ 

BCC 4% 
3$: ERROR 1 ;SWAB FAILED TO ALTER CODES PROPERLY 
4$: CMP RG, (R2) sCORRECT RESULT? 

BEQ 181232 3;BR IF YES 
5$: ERROR 1 ;SWAB DELIVERED WRONG RESULT 
soe eeeeerecerereereererseseseeseeseererseeaeeneeneeseaeerereseeees 
:*TEST 232 NEG MODE O TEST : CDESTJ] = 0 
so eteeeeererceeecersserveseserererereeresereerenesseseneeasesesesees 
181232: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #232,R0 ::;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 sRESULT S / B = 0 

CLR R53 s INITIAL CDESTJ] = 0 


SEQ i, 
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NEG MODE 0 TEST : CDESTJ = 0 
CCC ;CLEAR FLAGS 
273 sMAKE N:C = 1011 
28: NEG R3 s TEST THE NEG 
BMI 3$ 
BNE $ sN:C = 0100 ONLY ‘'2"' SET? 
Bvs 3$ 
BCC 4% 
3$: ERROR 2 sNEG FAILED TO ALTER CODES PROPERLY 
4%: CMP R3,R4 sWAS RESULT = 0 
BEQ 181233 3;BR IF YES 
5$: ERROR 2 sNEG DELIVERED WRONG RESULT 


;,; eeerrerrrereerereeeeeereeeeeeterenetteeneeeeeeeneeeeneeneeeeees 


SeTEST 233 NEG MODE 0 TEST : CDEST] LT 0 


sp, eeeerererereeereeereretenetertereenteeeaneeeeAeeeeeeeneeReeeeese 


181233: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #233,R0 3:LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 “ TEST INSTRUCTION WORD 
MOV #2,R4 sRESULT S / 2 
MOV #-2,R3 s INITIAL Chest) 177776 
CCC > CLEAR FLAGS 
276 MAKE N:C = 1110 
2$: NEG R3 sTEST THE NEG 
BM] 3% 
BEQ 3% 3N:C = 0001? 
BvS 3$ 
BCS 4% 
3$: ERROR 2 sNEG FAILED TO ALTER CODES PROPERLY 
4%: CMP R3,R4 ;RESULT = 2? 
BEQ TS1234 7;BR IF YES 
5$: ERROR 2 sNEG DELIVERED WRONG RESULT 


sy eeeeererererererererereneresereerereeetAeneeneeReareeAeeeeeTene 


s*TEST 234 NEG MODE 0 TEST : CDEST] = 100000 (8) 


-s@ewenrereterereeeterereeeeerereeeteeteeeereeeeeteteeeeteeeeteeeeerese 


1§1234: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #234,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV 7100000, RG ;RESULT S$ / B = 100000 
MOV R4,R5 SINITIAL CDEST] = 100000 
ccc ;CLEAR FLAGS 
SEZ ;MAKE N:C = 01000 
2$: NEG R3 TEST THE NEG 


SEQ 0100 
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1234 NEG MODE O TEST : CDESTJ = 100000 ‘8) SEQ 0101 
BPL 3$ 
BEQ 3$ zN:C = 1011? 
BvCc 3% 
BCS 4% 
3$: ERROR 2 sNEG FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 ;RESULT STILL 100000? 
BEQ 181235 > BR IF YES 
5$: ERROR 2 7NEG DELIVERED WRONG RESULT 
pp, eeeeererererererrereererereteeeeeeeeteteeateeneeeeeeeAReeeeAeeese 
s*TEST 235 NEG MODE 1 TEST : CDESTJ = 0 
pp eeteeeerererererererererererereerereeeeeeeeenreeeeKeRAeeReeeAtet 
181235: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #235,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :R2 POINTS TO DEST OP 
CLR R4 ;RESULT S / B = 0 
CLR (R2) s INITIAL CDESTJ = 0 
ccc ;CLEAR FLAGS 
273 :MAKE N:C = 1011 
2s: NEG (R2) sTEST THE NEG 
BM] 3$ 
BNE 3$ sN:C = 0100? 
BvSs 3$ 
BCC 4$ 
3$: ERROR 1 sNEG FAILED TO ALTER CODES PROPERLY 
4$: CMP (R2),R4 sRESULT = 0? 
BEQ 181236 3:BR IF YES 
5$: ERROR 1 sNEG DELIVERED WRONG RESULT 
pp ereeeererererererertatiennesererereseraraKaaeeeeeneeeeeeeeeeeeese 
:*TEST 236 NEG MODE 1 TEST : CDESTJ GT 0 
Spe eeeeerereereeeerereerrenerererereneeeeeeeAeereNneeeeeAeeAee sees 
1S1236: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #236,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :R2 POINTS TO DEST OP 
MOV #-2,R4 ;RESULT S / B = 177776 
MOV #2, (R2) sINITIAL CDEST] = 
ccc sCLEAR FLAGS 
266 sMAKE N:C = 0110 
2$: NEG (2) s TEST THE NEG 
BPL 3$ 
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NEG MODE 1 TEST : CDEST] G SEQ 0102 

BEQ 3$ zN:C = 1001? 

BvS 3$ 

BCS 4% 
3$: ERROR 1 sNEG FAILED TO ALTER CODES PROPERLY 
4%: CMP (R2),R4 sCORRECT RESULT? 

BEQ 181287 ::BR IF YES 
5$:, ERROR 1 sNEG DELIVERED WRONG RESULT 
sp, eeeererrrrerrereerreererererererereeeeeeReeeteennenenetenereres 
s*TEST 237 NEG MODE 1 TEST : CDESTJ] LT 0 
sp etererrerererrererrereerereerereeeereeeeneeReeateReeeneneeeenes 
TS1237: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #237,R0 LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO, R2 :R2 POINTS TO DEST OP 

MOV #2,R4 sRESULT S / B = 2 

MOV #-2, (R2) s INITIAL CDEST) = 177776 

CCC “CLEAR FLAGS 

276 MAKE N:C = 1110 
2$: NEG (R2) sTEST THE NEG 

BMI 3$ 

BEQ 3$ 3N:C = 0001? 

Bvs 3$ 

BCS 4% 
3$: ERROR 1 sNEG FAILED TO ALTER CODES PROPERLY 
4$: CMP (R2),R4 sCORRECT RESULT = 2? 

BEQ TST240 BR IF YES 
5$: ERROR 1 sNEG DELIVERED WRONG RESULT 
sper terererererererertetereeerereetereteteearareeeKereneeereeteee 
s*TEST 240 NEG MODE 1 TEST: CDEST] = 100000 (8) 
SyereeeeererrererereeiererterereeerenereneneneneneeeeeeeeeeeAAAes 
181240: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #240,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :R2 POINTS TO DEST OP 

MOV #100000, RG sRESULT S / B = 100000 

MOV R4,(R2) : INITIAL CDEST] = 100000 

CCC sCLEAR FLAGS 

‘SEZ MAKE N:Z = 0100 
2s: NEG (R2) ; TEST THE NEG 

BPL 3$ 

BEQ 3$ sw:C = 1011? 

BvC 3$ 
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NEG MODE 1 TEST: CDEST] = 100000 (8) 

BCS . 4% 
3$: ERROR 1 NEG FAILED TO ALTER CODES PROPERLY 
4%: CMP (R2) ,R4 CORRECT RESULT = 100000? 

BEQ T$1241 3 IF YES 
5$: ERROR 1 sNEG DELIVERED WRONG RESULT 
jg Peoenesnesesororseesessorreseseseoneesoorsoosensesosesoonesanes 

*TEST 241 ROR TEST = DMO - N:C = 1110 
peeeeeereerereterereeerereereretereeeetenereeeeneneeeeeeeeeeeees 

181241: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #241,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #52525,R4 RESULT S / B = 52525 

MOV #125252, R3 sCDESTI = 125252 

ccc CLEA R FLAGS 

276 ZN=C = 1111 
23: ROR R3 7 TEST THE ROR 

BMI 3$ 3N:C = 0000 ? 

BEQ 3$ 

BvS 3$ 

BCC 4$ 
3$: ERROR 2 ;ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 ;CORRECT RESULT ? 

BEQ TST242 ::BR IF YES 
5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 
ppeeeeeeeereeeeeeeeetertetereeeeee rere eA ee ee eee eA RKTT ATE 
s*TEST 242 ROR TEST - DMO - N:C = 1000 


ppeeeeeeereatertereeererrereretreeeeteeeeeteeeeee eRe eeeee eee 


TST242: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #242,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 ;RESULT S / B = 000000 
MOV #1,R3 (DEST) = 
ccc ;CLEAR FLAGS 
SEN 3N:C = 1000 
2$: ROR R3 ; TEST THE ROR 
BMI 3$ sN:C = 0111 ? 
BNE 3$ 
BvC 3$ 
BCS 4% 
3$: ERROR 2 ;ROR FAILED TO ALTER CODES PROPERLY 


SEQ 0103 
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1242 ROR TEST = DMO - N:C = 1000 
4$: CMP R4 RS ;CORRECT RESULT ? 

BEQ TST243 >: BR IF YES 
58: ERROR 2 ROR DELIVERED THE WRONG RESULT 
}g CooateseonnesecosorosonessorereesensensreneasnennaeemeanNOnItes 
s*TEST 243 ROR TEST - DMO - N:C = 0111 


,,eeeererererererrererrrreereerreetertereeeeerenereneeeAeAeeeteee 


181243: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #243,R0 LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #125252, R4 sRESULT S / B = 125252 
MOV #52525, R3 : (DEST) = 052525 
ccc CLEAR FLAGS 
267 iN: C = 0111 
23: ROR R3 ; TEST THE ROR 
BPL 3% sN:C = 1001 ? 
BEQ 3$ 
Bvs 3$ 
BCS 4% 
3$: ERROR 2 s;ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 ;CORRECT RESULT ? 
BEQ TST244 3:OR IF VES 
5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 
(DO So ugigtann > ge ne nal buat ag gg 0 es neem it eee Ne kA ae 
s*TEST 244 ASR TEST - DMO - N:C = 1000 
SURRKAARRAAEAAAAA TATA AA AAAAAAAAAA KARA AAAARAARARAARAARARRKAReRAeARe 
1$1246: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #244,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
CLR RG ;RESULT S / B = 000000 
MOV #1,R3 ;CDEST] = 1 
CCC sCLEAR FLAGS 
SEN “N:C = 1000 
2s: ROR R3 s TEST THE ROR 
BMI 3$ 3N:C = O111 ? 
BNE 3$ 
BvCc 3$ 
BCS 4% 
3$: ERROR 2 :ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 :CORRECT RESULT ? 
BEQ 181245 : BR IF YES 
5$: ERROR 2 sROR DELIVERED THE WRONG RESULT 


SEQ 0104 


— ~~ + 
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CQKDAD.P11 11-SEP-79 13:3) 1244 ASR TEST = DAO - N:C = 1000 SEQ 0105 
5510 
$511 ppeeeeereereerereecerreererereererereererrerereererererereeTTTeTe 
5512 s*TEST 245 ASR TEST = DMO - N:C = 0101 
$513 speeeeerrereeererrererererrerrerererrereereeeeererTereereeTereeee 
5514 016200 181245: 
5515 016200 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
5516 016202 012700 000245 MOV #245,R0 :;LOAD RO WITH TEST NUMBER 
5517 016206 013701 016226 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5518 016212 0127046 152525 MOV #152525,R4 :RESULT S / B = 152525 
5519 016216 012703 125252 Mov #125252,R5 :CDEST] = 125252 
5520 016222 000257 ccc :CLEAR FLAGS 
+434 016224 000265 265 NC = 0101 
44 44 016226 006005 2$: ROR R3 ;TEST THE ROR 
5525 016230 100003 BPL 3$ zN:C = 1010 ? 
5526 016232 001402 BEQ 3$ 
5527 016234 102001 BvCc 3$ 
Rese 016236 103001 BCC 4$ 
4434 016240 104002 3$: ERROR 2 ;ROR FAILED TO ALTER CODES PROPERLY 
5532 016242 020403 4$: CMP R4,R3 ;CORRECT RESULT ? 
at $4 016244 001401 BEQ 181246 ;;BR IF YES 
HH +4 016246 104002 5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 
5537 ppeeeeererererererererererereeeretertereteteeneeeeeneneneeeeTeee 
5538 :*TEST 246 ASR TEST - DMO - N:C = 1100 
5539 ppeeeeerererrererrererteeeeeeeterereerenerereneteeeeeeseeeereres 
5540 016250 TST246: 
5541 016250 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
5542 016252 012700 000246 MOV #246,R0 7;LOAD RO WITH TEST NUMBER 
5543 016256 013701 016276 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5544 016262 012704 025252 MOV #25252,R4 RESULT S / B= 2 
5545 016266 012703 052525 MOV #52525,R3 ;CDESTJ = 52525 
5546 016272 000257 ccc ho jae FLAGS 
Trt 4 016274 000274 274 N:C = 1100 

4 

geen 016276 006003 2$: ROR R3 TEST THE ROR 
5551 016300 100403 BMI 3$ zN:C = 0011 ? 
5552 016302 001402 BEQ 3$ 
5553 016304 102001 BvC 3$ 
So2e 016306 105401 BCS 4$ 
44 | 016310 104002 3$: ERROR 2 ;ROR FAILED TO ALTER CODES PROPERLY 
5558 016312 020403 4$: CMP R4 RS CORRECT RESULT ? 
+44 016314 001401 BEQ TS1247 > BR IF YES 
5561 016316 104002 5$: ERROR 2 ;ROR DELIVERED THE WRONG RESULT 
Ee ppeeeeeerenerrerrenerererereeererereeeeeeeeneeeeeteneeeee eset 
5564 *TEST 247 ROR TEST - DMI - N:C = 1110 
5565 ppeeeeeneeeereeeerererereteteeeteeeeeeeeeeeeneeneeeeeN Tere eee ees 


ee ———————————— ——SaaE 
7 4 


* 
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COKDAD.P11 11-SEP-79 13:31 1267 ROR TEST = DMI = W:C = 1110 SEQ 0106 

5566 016320 TS1247: 
5567 016320 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

568 016322 012700 000247 MOV #247,R0 ::LOAD RO WITH TEST NUMBER 

5569 016326 013701 016352 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5570 016332 012702 063312 MOV #MBUFO,R2 [DEST ADDR = MBUFO 

5571 016336 012704 052525 MOV #52525,R4 RESULT S / B = 52525 

5572 016342 012712 125252 MOV #125252, (R2) ;CDESTJ] = 125252 

5575 016346 000257 ccc ;CLEAR FLAGS 

eare 016350 000276 276 $ = 111 
gare 016352 006012 2$: ROR (R2) TEST THE ROR 
5578 016354 100403 BMI 3$ 3N:C = 0000 ? 

5579 016356 001402 BEQ 3$ 
5580 016360 102401 BvS 3$ 
44-44 016362 103001 BCC 4% 
+444 016364 104001 3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
5585 016366 020412 4$: CMP RG, (R2) ;CORRECT RESULT ? 
5586 016370 001402 BEQ 781250 73 BR IF YES 
5587 016372 011203 MOV (R2),R3 ;GET THE WAS DAT 
404 016374 104001 5$: ERROR 1 ROR DELIVERED URONG RESULT 
5590 ppeteererererererrererererrererereereteeeeeeeReeAAeeeT eRe eReR AAAS 
5591 i*TEST 250 ROR TEST - DMI - N:C = 1000 
5592 ppetreeererererreererererreeereteeeeeeeeeeeeeeeeeteeeeeeeeeee eet 
5593 016376 781250: 
5594 016376 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
5595 016400 012700 000250 MOV #250,R0 ;;LOAD RO WITH TEST NUMBER 
5596 016404 013701 016426 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5597 016410 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
5598 016414 005004 CLR R4 RESULT S$ f B = 000000 
5599 016416 012712 000001 MOV #1, (R2) :CDEST) = 
5600 016422 000257 ccc 7 CLEAR aes 
9 4) 016424 000270 SEN 3N:C = 1000 
et 016426 006012 2s: ROR (R2) 3; TEST THE ROR 
4 

5605 016430 100403 BM] 3$ oN:C = 0111 ? 
5606 016432 001002 BNE 3$ 
5607 016434 102001 Bvc 3$ 
sons 016436 103401 BCS 4% 
oy 016440 104001 3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
6 

5612 016442 020412 4$: CMP R4,(R2) ;CORRECT RESULT ? 

ote 016444 001402 BEQ T$1251 3:BR IF YES 

614 

5615 016446 011203 MOV (R2),R3 :GET THE WAS DATA 

5616 016450 104001 5$: ERROR 1 ;ROR DELIVERED WRONG RESULT 

ret p_eeeeteererererrererteeereretereerereteeeeeeneteeeteeeeeeee ete 
5619 s*TEST 251 ROR TEST = DMI - N:C = 0111 

5620 ppeeeeereerrrerrerererereererereererereetereneneeetenererereenete 
5621 016452 TS$1251: 
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+3 94 016502 
5631 016504 


5636 016514 
5638 016516 


5640 016520 
5641 016522 


5643 016524 
5644 016526 


5659 016560 
5661 016562 
5662 016564 
56635 016566 
5664 016570 
5666 016572 


5668 016574 
5669 016576 


5671 916600 
5672 016602 


5677 016604 


BASIC 
11-SEP- 


011203 
104001 


000004 


000270 
006012 
100403 


103401 
104001 


020412 
001402 


011203 
104001 


000252 
016560 
063312 


000001 


ao gs 
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1251 ROR TEST = DMI - N:C = O111 SEQ 0107 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #251,R0 7;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH Ms} INSTRUCTION WORD 
MOV #MBUFO,R2 DEST ADDR = 
MOV #125252 ,R4 :RESULT S / B = 1135252 
Vv #52525, (R2) ;CDEST) = $28 
ccc ; AR FLAGS 
267 3N:C = 0111 
23: ROR (R2) ; TEST THE ROR 
BPL 3$ sN:C = 1001 ? 
BEQ 3$ 
BvS 3$ 
BCS 4% 
3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
4%: CMP RG, (R2) s;CORRECT RESULT ? 
BEQ T$1252 > BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;ROR DELIVERED WRONG RESULT 
Pp eteeeeererererereerrereteereeerereeetereeAteReeneeeneeeeeneAsee 
s*TEST 252 ASR TEST = DM1 = N:C = 1000 
*“*@aeeretetreeeereeteeteetereteeeeeeteteereteteanekteeeaeeeekaeneeeneeeneees 
1§1252: 
SCOPE s;CALL THE SCOPE LOOP UTILITY 
MOV #252,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, R2 ;DEST ADDR = _— 
CLR RG RESULT S$ i 0000c0 
MOV #1,(R2) : (DEST) 2 
ccc 3; CLEAR aes 
SEN 7N:C = 1000 
23: ROR (R2) s TEST THE ROR 
BM1 3$ sw:C = 0111 ? 
BNE 3$ 
BvC 3$ 
BCS 4% 
3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) s;CORRECT RESULT ? 
BEQ 781253 > BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 sROR DELIVERED WRONG RESULT 
sp eeeevrereerresererererereesererererererenseeeeeeneneeseseneseaee 
s*TEST 253 ASR TEST = DM] = N:C = 1100 
sp eeeteererseerseserereseerseseeeseseereraeeeeneeseraeesenasesatee 
181253: 


CQKDA-D KD11-K BASIC LOG 


IC _ MACY11 S0A(1052) 11-SEP-79 
CQKDAD.P11 11-SEP-79 1 


1253 ASR TEST = DMI = N: 


ee 
we 
we 
o om 


MOV #MBUFO,R2 ies! ADDR = _— 
MOV #25252 ,R4 RESULT S / = 25252 


753 PAGE 109 

100 SEQ 0108 
5678 016604 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
5679 016606 012700 000255 MOV #253,R0 LOAD RO WITH TEST NUMBER 
5680 016612 015701 016636 MOV a#2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 

Bieess 02 i$ 
5683 016626 012712 052525 MOV #52525, (R2) :CDESTJ = 5528 
5684 016632 000257 ccc CLEAR FLAGS 
pee 016634 000274 274 iN:C = 1100 
ret 016636 006012 2s: ROR (R2) ; TEST THE ROR 
5689 016640 100405 BM1 3$ 3N:C = 0011 ? 
5690 016642 001402 BEQ 3% 
5691 016644 102001 BvCc 3$ 
4 016646 103401 BCS 4% 
sane 016650 104001 3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
5696 C€16652 020412 4$: CMP R4,(R2) ;CORRECT RESULT ? 
oof 016654 001402 BEQ TS1254 7:BR IF YES 
5699 016656 011203 MOV (R2),R3 GET THE WAS DATA 
aree 016660 104001 5$: ERROR 1 ;ROR DELIVERED WRONG RESULT 
5702 ppeeeeeeerereerereererereterererereterereeeteeeeeeeeeeesenereTees 
5703 :*TEST 254 ASR TEST - DMI - N:C = 0101 
5704 ppeeeeeeeereeerererererererteeeereeterereeneKeeneeeeeteereTeeTe 
5705 016662 TS1254: 
5706 016662 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
5707 016664 012700 000254 MOV #254,R0 ;;LOAD RO WITH TEST NUMBER 
5708 016670 013701 016714 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5709 016674 012702 063312 MOV #MBUFO,R2 ;DEST awe MBUF 0 
5710 016700 012704 152525 MOV #152525,R4 RESULT S / B = 152525 
5711 016704 012712 125252 MOV #125252, (R2) SLDESTI = 125252 
5712 016710 000257 ccc CLEAR FLAGS 
44k 016712 000265 265 :N:C = 0101 
ah 016714 006012 2$: ROR (R2) : TEST THE ROR 
5717 016716 100003 BPL 3$ 3N:C = 1010 ? 
5718 016720 001402 BEQ 3$ 
5719 016722 102001 BvCc 3$ 
gest 016724 103001 BCC 4$ 
trae 016726 104001 3$: ERROR 1 ;ROR FAILED TO ALTER CODES PROPERLY 
5724 016730 020412 4$: CMP R4,(R2) ;CORRECT RESULT ? 
37¢8 016732 001402 BEQ $1255 ::BR IF YES | 
6 

5727 916734 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
arcs 016736 104001 5$: ERROR 1 ;ROR DELIVERED WRONG RESULT 
44 34 Le eeeeeeeteneerreererereerereeeeeeteeeeterereneeHeneneneeneeees 
5731 s*TEST 255 RORB TEST - DM2 = EVEN ADDRESS 
5732 speeeeeeeererenrtertrrerreretereteetereeteeereeeeeeenteeee ete T Te 
5733 016740 181255: | 


CQKDA-D KD11-K 
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5734 016740 


016770 
57435 016772 
5745 016774 
5747 016776 


5749 017000 
5750 017004 


5752 017006 


5754 017010 
5755 017012 


5772 017052 
5774 017054 
5776 017056 
5778 017060 


5780 017062 
5781 017064 


5783 917066 
5784 017070 


5789 017072 





BASIC L 
\l- ~SEP=? 


012712 
000257 


106023 
105401 
104001 


022703 
001401 


104005 


020412 
001402 


011203 
104001 


000004 


000261 
106013 
103001 
104001 


020412 
001402 


011203 
104001 


000377 


063313 


000256 
017654 
063312 
000377 


000376 


MACY11 30A(1052) 
1255 


2$: 


3$: 
4$: 
5$: 
6$: 


7$: 


F 
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9 
13:52 PAGE 110 


RORB TEST = DM2 - EVEN ADORESS 


MOV 
ERROR 


#MBUFO,R2 
#177,R4 


R2,R 
#377,(R2) 


(R3)¢ 
4% 
1 


#MBUFO+1, RS 
6% 


5 


RG, (R2) 
TS1256 


are 


CALL THE SCOPE LOOP UTILITY 

:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
4 +f avi MBUF 0 


;RESULT S / B = 177 
7R3 CONTAINS DEST ADDR 
:(DEST) = 577 

‘SCOPE SYNC “'C"’ = 0 


; TEST THE RORB 

;BR IF ROR SET ‘'C"’ 

;ROR FAILED TO SET ‘'C"’ 

Se ae GET INCREMENTED ? 


;RORB FAILED TO UPDATE DEST REG 
;CORRECT RESULT ? 
IF YES 


oe 


GET THE WAS DATA 
;RORB DELIVERED WRONG RESULT 


sp eeeeereerrerrersereeereresereneeteereeeeeeeeeeneeRetenesaee eee? 


RORB TEST - DM’ = EVEN ADDRESS 


;*TEST 256 


-*e@eeketeretertereeeteetereereereeeeeeeeeeeAeeeeeeeteeeeteeteeeeeee 


181256: 


5$: 


MOV 
ERROR 


#MBUFO,R2 
#377 ,R4 


R2,R5 
#376, (R2) 


(R3) 
4% 
1 


R4,(R2) 
181257 


ena? 5 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 


;RESULT S / B = 377 
:R3 CONTAINS DEST ADDR 
:CDEST] = 376 


; CLEAR FLAGS 
;SCOPE SYNC = SET ‘'C"’ 


: TEST THE RORB 
:BR IF “‘C’’ CLR = IT SHOULD BE 
;RORB FAILED TO CLR ‘'C"’ 


;CORRECT RESULT ? 
3;BR IF YES 


;GET THE WAS DATA 
;RORB DELIVERED WRONG RESULT 


+ weeeeeeteetereeereteereeteneneeeetteteteeteeeeeeeeteeeetetenetes 


RORB TEST - DM2 - ODD ADDRESS 


oe 


s*TEST 257 


*s@eeeeerereteeeteteneetereneteeeeeteteteneteenteeeeeteteeteeeeee 


1§1257: 





COKDA-D KDI1-K BASIC L 


COKDAD.P11 
5790 017072 
5791 017074 
5792 017100 
5793 

794 017104 
$795 017112 
5796 017114 
5797 017116 
5798 017122 
5799 017126 
5800 017132 
5801 017134 
5802 017140 
5803 
5804 017142 
5805 
5806 017144 
5807 
5808 017146 
5809 
5810 017150 
5811 017154 
5812 
5813 017156 
5814 
5815 017160 
5816 017162 
5817 
5818 017164 
5819 017166 
5820 
5821 
5822 
5825 
5824 017170 
5825 017170 
5826 017172 
5827 017176 
5828 017202 
5829 017206 
5830 017212 
5831 017216 
$832 017220 
5833 017224 
5834 
5835 017226 
5836 
5837 017230 
5838 
5839 917232 
5840 
5841 017234 
$842 017236 
5843 
5844 017240 
5845 017242 


1ieseP=79. 
000004 
012700 
013701 


032737 
001401 


000257 
106025 
103401 
104001 


022703 
001401 


104005 


020415 
001402 


011503 
104001 


103001 
104001 


020415 
001402 


011503 
104001 


1¢ TESTS 
18: 31 


000257 
017142 
000040 
063313 
077777 
063312 
177777 


063314 


000260 
017226 
063313 
177777 
063512 


177377 


6 9 
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1257 RORB TEST = DM2 - ODD ADDRESS SEQ 0110 
SCOPE ae THE SCOPE LOOP UTILITY 
MOV #257, r+ LOAD RO WITH TEST NUMBER 
MOV aa2$,R OAD R1 WITH TEST INSTRUCTION WORD 
-SBTTL USER conteoniée. BREAKPOINT -- BITS 
063234 1 hoes asBPTLOC - oe HALT SET ?? 
HALT ;BREAK - DEPRESS CONTINUE TO RESTART 
MOV #MBUFO*1,R2 DEST ew Wy MBUF 0+ 1 
MOV #77777,R4 sRESULT S / B = 77777 
MOV #MBUFO,RS [POINT RS TO CHECK RESULT 
MOV R2,R3 :R3 CONTAINS DEST ADDR 
MOV #-1,(R5) ;COEST) = 177777 
ccc ;SCOPE SYNC = ‘CC’ =0 
cs: RORB (R3)¢ ; TEST THE RORB 
BCS 4% :BR IF "'C’’ IS SET = IT SHOULD BE 
3$: ERROR 1 ;RORB FAILED TO SET ‘'C’’ 
4$: CMP #MBUFO+2,R5 :DID DEST REG GET INCREMENTED ? 
BEQ 6$ sBR IF YES 
5$: ERROR 5 ;RORB FAILED TO UPDATE DEST REG 
6$: CMP R4,(R5) CORRECT RESULT ? 
BEQ T$1260 >:BR IF YES 
MOV (RS), R3 ;GET THE WAS DATA 
7$: ERROR 1 7RORB DELIVERED WRONG RESULT 
sy eeeereerereerereereeeeeeeereereeeeeeeeeeeKneeeteneeeeeeeeeeeeete 
:*TEST 260 RORB TEST - DM1 = ODD ADDRESS 
si eeweererererererererererereenteeetereneeaneeAneeneeeneeeransenee 
181260: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #260,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV aMBUFO+1, R2 :DEST ADDR = MBUFO+1 
MOV #-l, sRESULT S / B = 177777 
MOV sneur0.RS sPOINT RS TO CHECK RESULT 
MOV R2,R3 *R3 CONTAINS DcST ADDR 
MOV #177377, (R5) :CDEST) = 177377 
vEC :SCOPE SYNC = SET ‘“'C’ 
2%: RORB (R3)¢ : TEST THE RORB 
BCC 4% :BR IF "'C'' CLEAR = IT SHOULD BE 
3$: ERROR 1 ;RORB FAILED TO CLEAR ‘'C"’ 
4$: CMP R4, (RS) CORRECT RESULT ? 
BEQ 181261 >: BR IF YES 
MOV (R5),R3 ;GET THE WAS DATA 


5$: ERROR 1 ;RORB DELIVERED WRONG RESULT 


































CQKDAD.P11 


5846 
5847 
5848 
5849 
5850 017244 
5851 017244 
5852 017246 
5853 017252 
5854 017256 
5855 017262 
5856 017266 


586 

5861 017302 
5863 017304 
5865 017306 


5867 017310 
5868 017314 


5870 017516 


5872 017320 
5873 017322 


5875 017324 
5876 017326 


5877 

5878 

5879 

5880 

5881 017330 
5882 017330 
883 017332 
5884 017356 
5885 017342 
5886 017346 
5887 017352 


5892 017366 
5894 017370 
5896 017372 


5898 017374 
5899 0173576 


017400 


COKDA-D KD11-«K A oe 7} 





104001 


022703 
001401 


104005 


020415 
001402 


011503 
104001 


106213 
103001 
104001 


020415 
001402 


011503 


063314 


000262 
017366 
063313 
140377 
063312 


100377 





9 
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1260 RORB TEST - DM1 = ODD ADDRESS SEG O111 
,, eeerererererrrrererrrrererererererererereeaeenerererereeererese 
s*TEST 261 ASRB TEST - DM2 - ODD ADDRESS 
p,eeeeereererrerrerrerererererererereeerereeeeeenetereneneneneeeete 
TST261: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #261,R0 7;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO+1, R2 7DEST ADDR = MBUFO+1 

MOV #377,R4 sRESULT S / B = 377 

MOV #MBUFO,RS [POINT R5 TO CHECK RESULT 

MOV R2,R3 RE cout Aies ats ADDR 

MOV #777,0(R5) = (DEST) = 

CCC ; SCOPE sent oe = 0 
2s: ASRB (R3)+ ;TEST THE ASRB 

BCS 4% ;BR IF CARRY SET - IT SHOULD BE 
3$: ERROR 1 ;ASRB FAILED TO SET THE CARRY 
4%: CMP #MBUFO+2,R35 ;DID DEST REG GET INCREMENTED ? 

BEQ 6$ ;BR IF YES 
5$: ERROR 5 ;ASRB FAILED TO UPDATE DEST REG 
6$: CMP RG, (RS) ;CORRECT RESULT ? 

BEQ TST262 ;;BR IF YES 

MOV (R5),R3 ;GET THE WAS DATA 
7$: ERROR 1 ;ASRB DELIVERED WRONG RESULT 
sj erererererereerereerereeeeteereeteneteranetanereteneneneneeeeee 
s*TEST 262 ASRB TEST - DM1 = OOD ADDRESS 
so eeteeeererrreteronrereteeeeeeereerAeetenaeeteneneeateneteneneeee 
TST262: 

SCOPE 7CALL THE SCOPE LOOP UTILITY 

MOV #262,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO+1, R2 sDEST ADDR = MBUFO+1 

MOV #140377, R4 sRESULT S / B = 140377 

MOV #MBUFO,RS sPOINT RS TO CHECK RESULT 

MOV R2,R3 sR3 CONTAINS DEST ADDR 

MOV #100377, (R5) sCDEST] = 100377 

SEC :SCOPE SYNC = “C'’ = 1 
23: ASRB (R3) ;TEST THE ASRB 

BCC 4% ;BR IF CARRY CLEAR - IT SHOULD BE 
3$: ERROR 1 sASRB FAILED TO CLEAR THE CARRY 
4$: CMP R4,(R5) s CORRECT RESULT ? 

BEQ 181263 3;BR IF YES 

MOV (R5),83 ;GET THE WAS DATA 


CQKDA-D KD11-K BASIC £06 
CQKDAD.P11 


017402 


017434 
017436 
017440 
017442 


017444 
017450 


017452 


017454 
017456 


017460 
017462 


017514 
017516 
017520 
017522 


017524 
017526 


017530 
017532 


11-SEP-79 
104001 


103401 
104001 


022703 
001401 


104005 


020412 
001402 


011203 
104001 


103001 
104001 


020412 
001402 


011203 
104001 


1¢ TE 
13: 31 


000263 


000077 
000177 


063313 


000264 
017516 
063312 
000303 


000206 


STS 


-_ 
MACY11 30A(1052) 11-SEP-79 13:53 PAGE 113 
1262 ASRB TEST = DM1 - ODD ADDRESS 


5$: ERROR 1 sASRB DELIVERED WRONG RESULT 
sp eeererreeererererrererererrerererereeteeneerereeReneenereeeeeee 
s*TEST 263 ASRB TEST - DM2 - EVEN ADDRESS 
*“*@Peeeeeeeeeeeereeererereretererereeeteteeeeeeeeeeeenaeeeeeeeeeeese 
1$1263: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #263,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 DEST ADDR = MBUFO 
MOV #77,R4 sRESULT S / B = 77 
MOV R2,R3 R3 CONTAINS DEST ADDR 
MOV #177, (R2) =(DEST) = 177 
CCC :SCOPE SYNC - ‘'C’’ = 0 
2$: ASRB (R3)¢ ; TEST THE ASRB 
BCS 4% :BR IF ‘'C’’ = 1 = IT SHOULD BF 
7$: ERROR 1 ;ASRB FAILED TO SET ‘’C’’ 
4$: CMP #MBUFO+1,R3 :DID DEST REG GET INCREMENTED ? 
BEQ 6$ ;BR IF YES 
5$: ERROR 5 :ASRB FAILED TO UPDATE DEST REG 
6$: CMP R4,(R2) > CORRECT RESULT ? 
BEQ TS1T264 > BR IF YES 
MOV (R2),R3 7GET THE WAS DATA 
7$: ERROR ] ;ASRB DELIVERED WRONG RESULT 


ppeeererenerererreeerrentertrrrreeetrreeeaeteeeeee eee eee eS 


s*TEST 264 ASRB TEST - DM1 - EVEN ADDRESS 


speteeerereerrerereserererserreeereeAieseneneKAeeAeeReKAAT eee 


TS1264: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #264,R0 >:LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO, R2 :DEST ADDR = MBUFO 

MOV #303, RG sRESULT S / B = 303 

MOV R2,R3 R3 CONTAINS DEST ADDR 

MOV #206, (R2) ;CDEST] = 206 

SEC :SCOPE SYNC - “"C’’ = 1 
2$: ASRB (R3) ; TEST THE CLRASRB 

BCC 4% :BR IF CARRY CLEAR = ITSHOULD BE 
3$: ERROR 1 sASRB FAILED TO CLEAR THE CARRY 
4$: CMP R4,(R2) sCORRECT RESULT ? 

BEQ 181265 > BR IF YES 

MOV (R2),R3 :GET THE WAS DATA 
5$: ERROR 1 sASRB DELIVERED WRONG RESULT 


SEQ 0112 


- 
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1264 ASRB TEST - DMI = EVEN ADDRESS SEQ 0115 
5958 
5959 preeeerrrreerrerterereeeererettererererereeeereeteneeeetereerere 
960 eTEST 265 TST DMO TEST = N:C = 1011 
5961 ;eeeteerereeetteteererererereeeereetetereteerereneeeeeeetereeeee 
5962 017534 1§1265: 
5963 017534 000004 SCOPE :CALL_THE SCOPE LOOP UTILITY 
5964 017536 012700 000265 MOV #265 ,R0 ;;LOAD RO WITH TEST NUMBER 
5965 017542 013701 017556 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
5966 017546 005004 CLR RG ;RESULT S / B = 000000 
5967 017550 005003 CLR R3 ;CDESTJ = 000000 
5968 017552 000257 CCC CLEAR CODES 
4 24 017554 000273 273 3N:C=1011 
+44 017556 005703 28: TST R3 sTEST THE TST 
5973 017560 100403 BM1 3$ sN:C = 0100 ? 
5974 017562 001002 BNE 3$ 
5975 017564 102401 BVS 3$ 
44 017566 103001 BCC 4$ 
a 017570 104002 3$: ERROR 2 TST FAILED TO ALTER CODES PROPERLY 
5980 017572 020403 4$: CMP R4,R5 sRESULT OK ? 
ed 017574 001401 BEQ T$1266 :;BR IF YES 
pear 017576 104002 5$: ERROR 2 ;TST ALTERED THE CDESTJ 
5985 ppteeeeerereetereeteeertererineterterteeeeeeKeReReeee Kee ee TA Eee 
5986 s*TEST 266 TST DMO TEST - N:C = 0100 
5987 ppteeeeeeeeeeeeerereeerietrerertee rere e eee eee eee eee 
5988 017600 TS1266: 
5989 017600 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
5990 017602 012700 000266 MOV #266,R0 ;;LOAD RO WITH TEST NUMBER 
5991 017606 0135701 017624 MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
5992 017612 005004 CLR RG 
5993 017614 005104 COM R4 sRESULT S / B = 177777 
5994 017616 010403 MOV R4,R3 sCDEST] = 177777 
5995 017620 000257 ccc see CODES 
4 017622 000264 264 C=0100 
ceoe 017624 005703 2$: TST R3 TEST THE TST 
6000 017626 100005 BPL 3$ :N:C = 1000 ? 
6001 017630 001402 BEQ 3$ 
6002 017632 102401 BvS 3$ 
eo $ 017634 103001 BCC 4$ 
pred 017636 104002 3$: ERROR 2 TST FAILED TO ALTER CODES PROPERLY 
6006 
6007 017640 020403 4$: CMP R4,R3 sRESULT OK ? 
= 017642 001401 BEQ 1$1267 ::BR IF YES 
6 
6010 017644 104002 5$: ERROR 2 :TST ALTERED THE (DEST) 
re tH POM RSS RSESISSSOCSECSOSC SC CCE CSO SCE SCS ASSESSES E 


6015 #TES1 26? CLR DMO TEST = N:C = 1011 
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017672 
017674 
017676 
017700 
017702 
017704 


017706 
017710 


017712 


017736 
017740 
017742 
017744 
017746 
017750 


017752 
017754 


017756 
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000273 
005003 
100403 
001002 
102401 
103001 
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020403 
001401 
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000004 
012700 
013701 
005004 
012703 
000257 
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100403 


103001 
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020403 
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000004 
012700 
013701 


000267 
017672 


177777 


000270 
017736 


177777 


000271 
020006 
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1267 CLR DMO TEST - N:C = 1011 


-werererrrrererererrrererererereerrereteereneteeeaeterereeeeeeeeese 


181267: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #267,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 sRESULT S / B = 000000 
MOV #-1,R35 :CDEST) = 177 777 
CCC ; CLEAR CODES 
273 N:C 1011 
zs: CLR R3 s TEST THE CLR 
BMl 3$ 3N:C = 0100 ? 
BNE 3$ 
Bvs 3$ 
BCC 4$ 
3$: ERROR 2 ;CLR FAILED TO ALTER THE CODES PROPERLY 
4%: CMP R4,R3 sRESULT OK ? 
BEQ 781270 3;BR IF YES 
5$: ERROR 2 sCLR DELIVERED THE WRONG RESULT 
sp teeeeeeeeeeeeeteererereteeteneeerteereneeeKenraereeeneateeneeeee 
s*TEST 270 CLR DMO TEST - N:C = 0000 
Pp eteeeteeeteeeteerererereeretetereetreeeeeteAeeeteeReeeeeneReeeee 
TST270: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #270,R0 ;:LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 sRESULT S / B = 000000 
MOV #-1,R3 sCDESTJ] = 177777 
aed ;CLEAR CODES 
2$: CLR R3 s; TEST THE CLR 
BM] 3$ iN:C = 0100 ? 
BNE 3$ 
BvS 3$ 
BCC 4% 
3$: ERROR 2 sCLR FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R35 ;RESULT OK ? 
BEQ TS1271 ::BR IF YES 
5$: ERROR 2 sCLR DELIVERED THE WRONG RESULT 


ppeeeeeeererererererrerererrsereteeeteeereeeeeseeeneeeeaaeeeAee 


SeTEST 271 COM DMO TEST - N:C = 0110 


sp eeecerrererseererrerrrererteretereeeeeAreeeeeneeeeeneneeeseeees 


T$1271: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #271,R0 . ;;LOAD RO WITH TEST NUMBER 
MOV av2s,Ri LOAD R1 WITH TEST INSTRUCTION WORD 


SEQ 0114 
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000266 
005103 
100003 


103401 
104002 


020403 
001401 


104002 


000004 


000257 
000271 


005103 
100403 
001002 
102401 
103401 
104002 


020403 
001401 


104002 


000004 


000275 
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000272 
020054 


177777 


000273 
020122 


177777 
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COM DMO TEST - N:C = 0110 
MOV #125252,R4 sRESULT S / B = 125252 
MOV #52525.R3 sCDEST] = 52525 
ccc ;CLEAR CODES 
266 3N:C = 0110 
2%: COM R3 : TEST THE COM 
BPL 3$ iN:C = 1001 ? 
BEQ 3$ 
BvS 3$ 
BCS 4% 
3$: ERROR 2 ;COM FAILED TO ALTER THE CODES PROPERLY 
4% CMP R4,R3 ;RESULT OK ? 
BEQ TS1272 3:BR IF YES 
5$: ERROR 2 ;COM DELIVERED THE WRONG RESULT 
ee ee ee ee 
s*TEST 272 COM DMO TEST - N:C = 1001 
RARER eeeeeeeeteeeeeeteekeeeaeteeeenreeterese 
11272: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #272,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 sRESULT S / B = 000000 
MOV #-1,R3 :CDESTJ = 177777 
CCC ;CLEAR CODES 
271 sN:C = 1001 
2$: COM R3 sTEST THE COM 
BM! 3$ 3N:C = 0101 ? 
BNE 3$ 
Bvs 3$ 
BCS 4% 
3$: ERROR 2 :COM FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 
BEQ TS1273 7:BR IF YES 
5$: ERROR 2 :COM DELIVERED THE WRONG RESULT 


speatererrerreereeeetereerereereetereereeeeeeeeeeeeeeeneeeAe AES 


SeTEST 273 INC DMO TEST - N:C = 1011 


spteeeereerrerereeereteeerrerereretetenenteneeeeeeeeeeeeeeeATe Tee 


1§1273: 


SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #273,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 sRESULT S$ / B = 000000 

MOV #-1,R3 sCDEST) = 177777 

CCC > CLEAR CODES 

273 sN:C = 1011 


SEQ 0115 
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020122 
020124 


020132 
020134 


020136 
020140 


020142 


020144 


020170 
020172 
020174 
020176 
020200 
020202 
020204 


020206 
020210 


020212 


020214 


020236 
020240 
020242 
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005205 
100403 


103401 
104002 


020403 
001401 


104002 


000004 


000264 
005203 
100003 
001402 
102001 
103001 
104002 


020403 
001401 
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000004 


000273 
005305 
100403 
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000274 


077777 


000275 
020240 


000001 
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1273 INC DMO TEST - N: 1011 


23: INC R3 s TEST THE INC 

BM 3$ 3N:C = 0101 ? 

BNE 3$ 

BvS 3$ 

BCS 4% 
3$: ERROR 2 s INC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 

BEQ TST274 3;BR IF YES 
5$: ERROR 2 : INC DELIVERED THE WRONG RESULT 
pp eeeeereerererereneeeeererteerteerererteeKeKeKnenenteneeeeeeeeHee 
s*TEST 274 INC DMO TEST - N:C = 0100 
pp eeeeeeeeereeerreeeteerereerereeereereeeteeeeKeeeAeAeKAeeeA eee 
TST274: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #274,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100000 ,R4 sRESULT S / B = 100000 

MOV #77777,R3 sCDEST] = 77777 

ccc ;CLEAR CODES 

264 3N:C = 0100 
2$: INC R3 sTEST THE INC 

BPL 3$ sN:C = 1010 ? 

BEQ 3$ 

BvCc 3$ 

BCC 4% 
3$: ERROR 2 : INC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 

BEQ TST275 3:;BR IF YES 
5$: ERROR 2 : INC DELIVERED THE WRONG RESULT 
sp eteaerererreererresrerereterererateteeeeeeAAeeKeneeserereeeeees 
s*TEST 275 DEC DMO TEST - N:C = 1011 
speeereeerrerreerererertererererereneneereneeeReeeneeeeeeeeT eee 
TST275: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #275,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 :RESULT S / B = 000000 

MOV #1,R3 ;CDEST) = 1 

ccc ;CLEAR CODES 

273 sN:C = 1011 
2$: DEC R3 :TEST THE DEC 

BMI 3$ sN:C = 0101 ? 


SEQ 0116 
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020250 
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104002 
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000276 


100000 


000277 
020354 
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1275 DEC DMO TEST - N:C = 1011 SEQ 0117 

BNE 3$ 

BvS 3$ 

BCS 4$ 
3$: ERROR 2 ;DEC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,RS RESULT OK ? 

BEQ TS1276 7:BR IF YES 
5$: ERROR 2 ;DEC DELIVERED THE WRONG RESULT 
ppeeeeneerererrerereerererererereerereetenereeneereeeereeteerenes 
TEST 276 DEC DMO TEST - N:C = 1100 
speeeeereeererererereretrererererereteereeeeeteeerererererererese 
TST276: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #276,R0 3;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #77777 ,R4 RESULT S / B = 77777 

MOV #100000, R3 ;CDESTJ] = 100000 

ccc ;CLEAR CODES 

274 3N:C = 1100 
2$: DEC R3 : TEST THE DEC 

BM] 3$ N:C = 0010 ? 

BEQ 3$ 

BvC 3$ 

BCC 4$ 
3$: ERROR 2 :DEC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 ;RESULT OK ? 

BEQ TS$1277 7;BR IF YES 
5$: ERROR 2 :DEC DELIVERED THE WRONG RESULT 
js See eeeccceneererersererecooeeesereneseeseseneneseseesessooeeee 
*TEST 277 DEC DMO TEST - N:C = 0000 
ppeeeeeeneereeeeereteteteteteteet eee e AKER ERT ETT E Te 
TST277: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #277,R0 :; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 oye . WITH TEST INSTRUCTION WORD 

MOV #-1,R4 RESULT S / B = 177777 

CLR R3 ‘tbe sts = 000000 

ccc ; CLEAR CODES 
2$: DEC R3 sTEST THE DEC 
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6232 020356 
360 


6237 020366 


38 
6239 020370 
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6247 020376 
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6256 020422 
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6263 020434 
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6266 020440 


6268 020442 


6273 020444 


6280 020470 
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6285 020476 
6286 020500 
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001402 
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100403 


103401 
104002 


020403 
001401 


104002 


006303 


100003 
001402 
102001 
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000300 
020422 
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000301 
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MACY 
1277 DEC DMO TEST - N:C = 0000 SEQ 0118 

BPL 3$ zN:C = 1000 ? 

BEOQ 3$ 

Bvs a 

BCC 4% 
3$: ERROR 2 ;DEC FAILED TO ALTER THE CODES PROPERLY 
4%: CMP RG,RS sRESULT OK ? 

BEQ 181300 7:;BR IF YES 
5$: ERROR 2 7DEC DELIVERED THE WRONG RESULT 
sp etewerereerrerererererererenerrerererenereeeeneneneTeeeTeeeeeee 
z*TEST 300 ASL DMO TEST - N:C = 1000 
sp eeeerererererererreeererrererrereereteneneneNaeneseeeneseeeesTe 
7$1300: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #300,R0 >; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 4 opty + WITH TEST INSTRUCTION WORD 

CLR RG RESULT S : B = 000000 

MOV #100000,R3 {TDeST) = 100 

ccc >CLEAR CODES 

SEN N:C = 1000 
2$: ASL R3 sTEST THE ASL 

BM] 3$ 3N:C = O111 ? 

BNE 3$ 

Bvc 3$ 

BCS 4% 
3$: ERROR 2 sASL FAILED TO ALTER THE CODES PROPERLY 
43%: CMP R4,R3 ;RESULT OK ? 

BEQ 781301 7;BR IF YES 
5$: ERROR 2 sASL DELIVERED THE WRONG RESULT 
speeeeerrrrererrerererrinererereseeesanenereeeareRAAeeaeeeeeTeTes 
s*TEST 301 ASL DMO TEST - N:C = 0101 
speeerererrererererenseerereereseneerereenaneenenneeaeaetereTeTee 
TST301: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #301,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100000,R4 sRESULT S / B = 100000 

MOV #40000,R3 sCOEST] = 400 

CCC ;CLEAR CODES 

265 N= C = 0101 
2: ASL R3 sTEST THE ASL 

BPL 3$ sN:C = 1010 ? 

BEQ 3$ 

Bvc 3$ 
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104002 
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000302 
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1301 ASL DMO TEST - W:C = 0101 

BCC 4% 
3$: ERROR 2 sASL FAILED TO ALTER THE CODES PROPERLY 
4%: CMP RG RS sRESULT OK ? 

BEQ 181302 77BR IF YES 
5$: ERROR 2 sASL DELIVERED THE WRONG RESULT 
ee ee 
s*TEST 302 ASL DMO TEST - N:C = 0010 
ppeteererreerererererereeerererrrererereeeeeeteeeenaneeeeeeeeT eee 
181302: 

SCOPE 7CALL THE SCOPE LOOP UTILITY 

MOV #302,R0 s;LCAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 sRESULT S / 8B = 000000 

CLR R3 ;COEST] = 000000 

ccc sCLEAR CODES 

SEV 3N:C = 0010 
2%: ASL R3 ;TEST THE ASL 

BMl 3$ zN:C = 0100 ? 

BNE 3$ 

Bvs 3% 

BCC 4$ 
3$: ERROR 2 sASL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 

BEQ 181303 37;BR IF YES 
5$: ERROR 2 sASL DELIVERED THE WRONG RESULT 


speeeeerenrereerrerrrrereerteereerereetenereeeeeeseeareeerereNTeS 


s*TEST 305 ROL DMO TEST = N:C = 1101 


;peeeeereerereerertererretetereerereereneeeeeteeeaeeneReeseeee eee 


151303: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #303,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #5252524 sRESULT S / B = 52525 
MOV #125252, R3 tee sha = 125252 
CCC CLEAR CODES 
275 ee = 1101 
2%: ROL R3 sTEST THE ROL 
BMI 3$ sN:C = CO1l ? 
BEQ 3$ 
BvCc 3$ 
BCS 4% 
3$: ERROR 2 sROL FAILED TO ALTER THE CODES PROPERLY 


ome CC yy 
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CQKDAD.P11 11-SEP-79 1%: 31 1303 ROL DMO TEST - N:C = 1101 SEQ 0120 
6343 020622 020403 4%: CMP RG RS RESULT OK ? 
re 020624 001401 BEQ 1$1304 7;BR IF YES 
om 020626 104002 5$: ERROR 2 ;ROL DELIVERED THE WRONG RESULT 
6348 ; peeeeererererererreeereereereereererereeeterreneeeenereerererere 
6349 TEST 304 ROL DMO TEST - N:C = 0101 
6350 ppeeeeerererererrerererrreeerererererrerereereeTereTerereeeeeTeTe 
6351 020630 1§1304: 
6352 020630 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
6353 020632 012700 000304 MOV #304,R0 ;:LOAD RO WITH TEST NUMBER 
6354 020636 013701 020656 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
6355 020642 012704 125253 MOV #125253,R4 sRESULT S / B = 125253 
6356 020646 012703 052525 MOV #52525,R3 ;CDEST] = 52525 
6357 020652 000257 ccc [CLEAR CODES 
4 tt 020654 000265 265 i3N:C = 0101 
ont 020656 006103 2s: ROL R3 sTEST THE ROL 
6362 020660 100003 BPL 3$ 3N:C = 1010 ? 
6363 020662 001402 BEQ 3$ 
6364 020664 102001 BvCc 3$ 
on 020666 103001 BCC 4% 
6367 020670 104002 3$: ERROR 2 sROL FAILED TO ALTER THE CODES PROPERLY 
6368 020672 020403 4$: CMP R4,RS sRESULT OK ? 
5 + 020674 001401 BEQ 1$1305 7:BR IF YES 
ore 020676 104002 5$: ERROR 2 sROL DELIVERED THE WRONG RESULT 
6375 ppeeeeeerererererrereerreeeeererereeeteteeeeeTeteeeeNeeeeEEEtETe 
6374 s*TEST 305 ROL DMO TEST - N:C = 0010 
6375 ppt teeeeeeerererererererereeeerereeeereeeeeeeereteeeeeerereTteeeS 
6376 020700 181305: 
6377 020700 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
6378 020702 012700 000305 MOV #305,R0 LOAD RO WITH TEST NUMBER 
6379 020706 013701 020722 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
6380 020712 005004 CLR R4 sRESULT S / B = 000000 
6381 020714 005003 CLR R3 ;CDESTJ = 000000 
6382 020716 000257 ccc ;CLEAR CODES 
ert 020720 000262 SEV 3N:C = 0010 
on: 020722 006103 2$: ROL R3 ;TEST THE ROL 
6586 
6387 020724 100403 BM] 3$ 3N:C = 0100 ? 
6388 020726 001002 BNE 3$ 
6389 020730 102401 BvS 3$ 
or 020732 103001 BCC 4% 
6 
ore 020734 104002 3$: ERROR 2 sROL FAILED TO ALTER THE CODES PROPERLY 
6 
6394 020736 020403 4$: CMP R4,R3 ;RESULT OK ? 
or 020740 001401 BEQ 181306 ;7BR IF YES 
6596 
Te 020742 104002 5$: ERROR 2 sROL DELIVERED THE WRONG RESULT 
639 
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6446 021054 
6447 021056 


6449 021060 


6454 021062 


BASIC L 
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005503 
100003 


103001 
104002 


020403 
001401 


104002 


000004 


000273 
005503 
100403 
001002 
102401 
103401 
104002 


020403 
001401 


104002 


OGIC TESTS 
9 13:31 


000306 
0 


000307 
021040 


177777 


E 
1306 ADC DMO TEST = N:C = 


peereererrrerererererererereerrereeeeeereteeeereneeeeteTerereeee 


10 “i. eke bo 
MACYIT 30A(1052)_ 11-SEP=79 13:53 PAGE 122 
0101 SEQ 0121 


SaTEST 306 ADC DMO TEST = N:C = 0101 


-@eeereerteererterrerrerrerererererereeeetereteteteneeeeeteeereeete 


181306: 


SCOPE ;CALL THE SCOPE tt UTILITY 
MOV #306,R0 > LOAD RO wiTw TES ER 
MOV 2423,R1 4 p49 R1 WITH 1ST. INSTRUCTION WORD 
MOV #100000 ,R4 sRESULT S / B = 100000 
MOV #77777,R3 ;CDESTI = 77777 
ccc CLE R CODES 
265 3N:C = 0101 
23: ADC R3 sTEST THE ADC 
BPL 3% 3N:C = 1010 ? 
BEQ 3% 
BvCc 3% 
BCC 4% 
3$: ERROR 2 ;ADC FAILED TO ALTER THE CODES PROPERLY 
4%: CMP R4,R3 sRESULT OK ? 
BEQ 181307 ;;BR IF YES 
5$: ERROR 2 ;ADC DELIVERED THE WRONG RESULT 


*“s@@eteeterereertetetetetreereeteteteaetetenetaetentenetenetetenteteeetes 


S#TEST 307 ADC DMO TEST - N:f = 1011 


s, eeereeseerrererereteneseenerererseeseneneseenaeaseneateanseeeee 


1$1307: 


SCOPE s;CALL THE SCOPE LOOP UTILITY 

MOV #307,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

CLR RG sRESULT S / B = 000000 

MOV #-1,R3 ;CDESi) = 177777 

CCC CL LEAR CODES 

273 sN:C = 1011 
2$: ADC R3 sTEST THE ADC 

BM] 3$ sw:C = 0101 ? 

BNE 3$ 

Bvs 3$ 

BCS 4$ 
3$: ERROR 2 sADC FAILED TO ALTER THE CODES PROPERLY 
4%: CMP R4,R3 sRESULT OK ? 

BEQ 181310 ;;BR IF YES 
5$: ERROR 2 ;ADC DELIVERED THE WRONG RESULT 
*“*@eeeeeereeereneereeeeeererezeeeeeeertereeeeeteeeeeeeeneeneneeeneeesene 

eTESI 310 ADC DMO TEST = N:C = 1010 


**@@eeeereeeeeetetetetaeteteteeeeetanteeeeeeeeseeeeeeeeneteseteretes 


1$1310: 


| 
| 
ol 
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021110 
021112 
021114 
021116 
021120 
021122 


021124 
021126 


021130 


021132 


021154 
021156 


021160 
021162 
021164 
021166 


021170 


021172 
021174 


021176 


021200 
021200 
021202 
021206 
021212 
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000272 
005503 
100003 


103001 
104002 


020403 
001401 


10400? 


000004 


000273 
005603 
100403 
001002 
102401 
103001 
104002 


020403 
001401 


104002 


a 


000311 
021156 


000001 


10 
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10 ADC DMO TEST = N:C = 10 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #310,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 


MA 
13 


MOV #-1,RG RESULT S$ / 93 177777 

MOV #-1,R3 :iDEST) = 17 7777 

ccc ; CLEAR CODES 

272 3N:C = 1010 
23: ADC R3 s TEST THE ADC 

BPL 3$ 3N:C = 1000 ? 

BEQ 3$ 

BvS 3$ 

BCC 4% 
3$: ERROR 2 ;ADC FAILED TU ALTER THE CODES PROPERLY 
43%: CMP RG RB sRESULT OK ? 

BEQ T$1311 77BR IF YES 
$3: ERROR 2 ;ADC DELIVERED THE WRONG RESUL! 
si eeretereerersereeriererererererererenenaereeeeeneeeereneneneenee 
s*TEST 311 SSC DMO TEST = N:C = 1011 


sp teetererrereerrerereneeerertereeetenteneeaeeneeeeeneteseneteneee 


TST311: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 


MOV #311,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR RG ;RESULT S$ , i. = 000000 
MOV #1,R3 ;CDESTIJ = 
CCC CLEAR cnees 
273 oN:C = 1011 
2$: SBC R3 sTEST THE SBC 
BM] 3$ 3N:C = 0100 ? 
BNE 3$ 
BvS 3% 
BCC 4% 
3$: ERROR 2 :SBC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,R3 sRESULT OK ? 
BEQ 1$1312 ;;BR IF YES 
5$: ERROR 2 ;SBC DELIVERED THE WRONG RESULT 


sp ereeeterereseseererererterereerereseersenenenesenenenenenerenes 


s*TEST 312 SBC DMO TEST = N:C = 0101 


ss eeenercerereeseresereseesesesecesesererasaresesenesenaeesenecese 


1S1312: 


SCOPE CALL THE SCOPE LOOP UTILITY 

MOV #312,R0 ;;LOAD RO WITH TEST NUMBER 

MOV a#2$,R ;LOAD R1 WITH TEST Nant ae WORD 
MOV #077777,R4 RESULT S / B = 077777 


SEQ O122 


‘ 


6550 021312 020403 4%: CMP R4,RS ;RESULT OK ? 
6551 021314 001401 BEQ TST314 7;BR IF YES 


6553 021316 104002 5$: ERROR 2 ;SBC DELIVERED 7HE WRONG RESULT 


6555 pptteeeeneereeerrereerertrereteetereertteeeeeenereee et eee TEA eee 


6556 *TEST 314 SBC DMO TEST - N:C = 0111 

6557 S eeneeeenererereerererereeeeetereretreenreeeeeeneeneerererereess 
6558 021320 TST314: 

6559 021320 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

6560 021322 012700 000314 MOV #314,R0 3;LOAD RO WITH TEST NUMBER 

6561 021326 01370! 021344 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
6562 021332 012704 177777 MOV #-1,R4 RESULT $ / B = 177777 

6563 021336 005003 CLR R3 :;CDEST] = 000000 

6564 021340 000257 ccc ; CLEAR tt i 


6565 021342 000267 267 7N:C 1 


C 
0 


G 10 ‘| 
CQKDA=-D KDI1-K BASIC LOGIC TESTS MACY11 350A(1052) 11-SEP-79 15:55 PAGE 124 | 
CQOKDAD.P11 11-SEP-79 15:31 1312 SBC DMO TEST - N:C = 0101 SEQ 0125 
6511 021216 012703 100000 MOV #100000 ,R5 ;CDESTJ = 100000 
6512 021222 000257 ccc ;CLEAR CODES 
4 021224 000265 265 sN:C = 0101 
44h 021226 005603 2%: SBC R3 ; TEST THE SBC 
6517 021230 100403 BMI *$ 3N:C = 0010 ? 
6518 021232 001402 BEQ 3$ 
6519 021234 102001 BvCc 3$ 
o2et 021236 103001 BCC 4$ 
4431 021240 104002 3$: ERROR 2 ;SBC FAILED TO ALTER THE CODES PROPERLY 
6524 021242 020403 4$: cmp R4 RS ;RESULT OK ? 
aoe 021244 001401 BEQ 181313 ;:BR iF YES 
4434 021246 104002 5$: ERROR 2 :SBC DELIVERED THE WRONG RESULT 
6529 ppeeeeeereereerrereeerererererererererereneterereeteneeterererere 
6530 s*TEST 313 SBC DMO TEST - N:C = 1110 
6531 ppeteteererererrerrrerererererterereneeenereneeseneneeeneneeeTeee 
6532 021250 TS1313: 
6533 021250 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
6534 021252 012700 000313 MOV #313,R0 3;LOAD RO WITH TEST NUMBER 
6535 021256 013701 021276 MOV a#2$,R1 7LOAD R1 WITH TEST INSTRUCTION WORD 
6536 021262 012704 000001 MOV #1,R4 sRESULT S / B= 1 
6537 021266 012703 000001 MOV #1,R5 :CDESTJ = 1 
6538 021272 000257 CCC ;CLEAR CODES 
ete 021274 000276 276 gN:C = 1110 
ot 021276 005605 2$: SBC R3 TEST THE SBC 
6543 021300 100403 BM] 3$ 3N:C = 0000 ? 
6544 021302 001402 BEQ 3$ 
6545 021304 10240° BVS 3$ 
4 021306 103001 BCC 4$ 
4 
6548 021310 104002 3$: ERROR 2 :SBC FAILED TO ALTER THE CODES PROPERLY 
| 


a ey 
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021344 
021346 


021354 
021356 


021360 
021362 


021364 


021366 


021412 
021414 
021416 


021424 
021426 


021430 
021432 


021434 
021436 


021440 


021470 
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005603 
100003 


103401 
104002 


020403 
001401 


104002 


000004 


000257 
000273 


005712 
100403 
001002 
102401 
103001 
104001 


020412 
001402 


011203 
104001 


000004 


000264 
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000316 
021472 
063312 


177777 


H 
Hale "oo aoe \1- SEP-79_ 


10 
13:53 PAGE 125 
DMO TEST - N:C = 01 


1 


23: SBC R3 ;TEST THE SBC 

BPL 3% iN:C = 1001 ? 

BEQ 7$ 

Bvs 3% 

BCS 4% 
3$: ERROR 2 ;SBC FAILED TO ALTER THE CODES PROPERLY 
4%: CMP RG,R3 sRESULT OK ? 

BEQ T$1315 ;c7BR IF YES 
5$: ERROR 2 :SBC DELIVERED THE WRONG RESULT 
speeeeerererereerereerrereesererrererereenerererenenenaeerereenes 
s*TEST 315 TST DM! TEST = N:C = 1011 
sp eereerereeerererrererrererererrrereneeneneneaeeeerereeerereseTe 
1S1315: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #315,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 sDEST ADDR = MBUF 0 

CLR RG :RESULT S / B = 000000 

CLR (R2) ;CDESTJ = 000000 

ccc > CLEAR CODES 

273 7N:C=1011 
2s: TST (R2) sTEST THE TST 

BM] 3$ sN:C = 0100 ? 

BNE 3$ 

BvS 3% 

BCC 4% 
3$: ERROR ] sTST FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 

BEQ TS1316 3;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 :1TST ALTERED THE (DEST) 
° seeaeererereerrerserereeeereeereretenerenteaseranesesssaseTeetes 

SeTEST 316 TST DM1 TEST - N:C = 0100 

e  ananaanbetiibensmeaimnestthaaeenenaeemeseanannneotnal 
151316: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #316,R0 ;;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WCRD 

at tas »R2 DEST ADDR = MBUFO 

L 

COM sRESULT S$ / B = 17777? 

MOV en :(DEST) = 177777 

CCC sCLEAR CODES 

264 3N:C=0100 





SEQ 0124 
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021472 
021474 


021502 
021504 


021506 
021510 


021516 
021516 
021520 
021524 


021530 


021556 
021560 
021562 


021570 
021572 


021574 
021576 


021600 
021602 


021604 


021622 


11-SEP- 
005712 
100003 


103001 
104001 


020412 
001402 


011203 
104001 


000004 
012700 
013701 


032737 


000273 
005012 
100403 


103001 
104001 


020412 
001402 


011203 
104001 


000004 
012700 
013701 
012702 
005004 


0 
79 
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000317 
021560 


000100 


063312 
177777 


000320 
021632 
063312 


063234 


10 

MACYI1 tel an l1- ~SEP-79 13:53 PAGE 126 
1316 DMI TEST - N:C = 0100 
2s: TST (R2) ; TEST THE TST 

BPL 3% iN:C = 1000 ? 

BEQ 7$ 

BvS 3$ 

BCC 4$ 
3$: ERROR 1 ;TST FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 

BEQ T$1317 ;;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 :TST ALTERED THE CDESTJ 
ppeeeeeereenetreteeeerereererererereeretenetenerenteeterereeretee 
s*TEST 317 CLR DMI TEST = N:C = 1011 


,, eerertererrrereterrererererrerererererereteneneeeneeaereseretere 


7$1317: 


SCOPE # CALL THE SCOPE LOOP UTILITY 
MOV #317,R0 sLOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 

-SBITL USER CONTROLLED BREAKPOINT -- BIT6 

BIT #BIT6,a#BPTLOC ;BREAKPOINT HALT SE? ?? 

BEQ +4 ;BR IF NOT 

HALT ;BREAK - DEPRESS CONTINUE TO RESTART 

MOV #MBUFO,R2 ;DEST ADDR = Rey FO 

CLR R4 sRESULT S / spnere 

MOV #-1,(R2) :(DEST] = 179777 

CCC ;CLEAR CODES 

273 3N:C = 1011 
2s: CLR (R2) s TEST THE CLR 

BM] 3$ 3N:C = 0100 ? 

BNE 3$ 

BvS 3$ 

BCC 4$ 
3$: ERROR 1 :CLR FAILED TO ALTER THE CODES PROPERLY 
4$%: CMP R4,(R2) sRESULT OK ? 

BEQ 181320 3;7;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 :CLR DELIVERED THE WRONG RESULT 
spe eeeeerererserserererrerereteneererereseeeneneeereesenneseneesese 
z*TEST 320 CLR DM2 TEST = N:C = 0000 


Sp eeereereeressesrererrecreceseeseereeseeneeneeneeneesaeseeseeeee 
181320: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #320,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R) sLOAD R1 WITH ud INSTRUCTION WORD 
MOV #MBUFO, R2 DEST ADDR = MBU FO 
CLR RG sRESULT S / B = 000000 


SEQ 0125 


EE lh 


10 
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CQKDAD.P11 11-SEP-79 13:31 1320 CLR DM2 TEST - N:C = 0000 SEQ 0126 
6679 021626 013712 063524 MOV aaDwiA+2,(R2) (DEST) = 177777 
aon 021630 000257 ccc ;CLEAR CODES 
ret 021632 005022 2$: CLR (R2)¢ ;TEST THE CLR 
6684 021634 100403 BMI 3$ 3N:C = 0100 ? 
6685 021636 001002 BNE %$ 
6686 021640 102401 BvS 3$ 
roe tH 021642 103001 BCC 4$ 
ord 021644 104001 3$: ERROR 1 ;CLR FAILED TO ALTER THE CODES PROPERLY 
6691 021646 022702 063314 4$: CMP #MBUFO+2,R2 ;D1D CLR INCREMENT DEST REG 
pee 021652 001401 BEQ 6$ :BR IF YES 
rot 021654 104005 5$: ERROR 5 CLR FAILED TO UPDATE DEST REG 
6696 021656 020442 6$: CMP R4,-(R2) ;RESULT OK ? 
nor 4 021660 001402 BEQ TS1321 ;:BR IF YES 
6699 021662 011203 MOV (R2),R3 ;GET THE WAS DATA 
oe 021664 104001 7$: ERROR 1 ;CLR DELIVERED THE WRONG RESULT 
6702 a a er ce ena ee ee ae 
6703 s*TEST 321 COM DM1 TEST - N:C - 0110 
6704 .  eSe ene coeerereseeresoresceseesseoeserneoessensorooenseoneeeosee 
6705 021666 181321: 
6706 021666 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
6707 021670 012700 000321 MOV #321,R0 ;;LOAD RO WITH TEST NUMBER 
6708 021674 013701 021720 MOV av2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
6709 021700 012702 063512 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
6710 021704 012704 125252 MOV #125252,R4 sRESULT S / B = 125252 
6711 021710 012712 052525 MOV #52525, (R2) ;CDEST] = 52525 
6712 021714 000257 ccc CLEAR CODES 
ot 021716 000266 266 sN:C = 0110 
A 021720 005112 2$: COM (R2) TEST THE CLR 
6 
6717 021722 100003 BPL 3$ 3N:C = 1001 ? 
6718 021724 001402 BEQ 3$ 
6719 021726 102401 BvS 3$ 
ory 021730 103401 BCS 4$ 
6722 021732 104001 3$: ERROR 1 ; COM FAILED | TO ALTER THE CODES PROPERLY 
6723 021734 020412 4$: CMP R4,(R2) :RESULT OK ? 
reba 021736 001402 BEQ TST322 ::BR IF YES 
6 
6726 021740 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
oree 021742 104001 5$: ERROR 1 :COM DELIVERED THE WRONG RESULI 
ores ppeeeeeeneeeneeeerrerererereereetteeeeteteeeKeeeteeeeeTeTe Eee 
6730 s*TEST 322 COM DM] TEST - N:C = 1001 
6731 ppeeeerereenrrerrereerertereeeerereretereneteereeeteneeeeeeAe eee 
6732 021744 TST322: 
6733 021744 004 SCOPE ;CALL THE SCOPE LOOP UTILITY 


00000 
6734 021746 012700 000522 MOV #322,R0 7;LOAD RO WITH TEST NUMBER 





——— | 
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021752 


021772 
021774 
021776 


022004 
022006 
022010 
022012 


022014 
022016 


022020 


022046 
022050 
022052 
022054 
022056 
022060 
022062 
022064 
022066 


022070 
022072 


022074 


022106 
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013701 
agree 


O12713 
000257 

000271 
005112 


100403 


103401 


104001 
020412 
001402 


011203 
104001 


000004 


000273 
005212 


100403 
001002 
102401 
103401 


104001 
020412 
001402 


011203 
104001 


000004 

012700 
013701 
012702 


13:31 


021774 
063312 


177777 


000323 
022050 
063312 


177777 


000324 
022126 
063312 


K 10 
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1322 COM DM! TEST - N:C = 1001 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
CLR RG RESULT S$ / Pe , neuen 
MOV #-1,(R2) ‘(DEST = 1777 
ccc oy age CODES 
271 sN:C = 1001 
23: COM (R2) sTEST THE COM 
BMI 3$ 3N:C = Q101 ? 
BNE 3$ 
BvS 3$ 
BCS 4% 
3$: ERROR 1 ;COM FAILED | TO ALTER THE CODES PROPERLY 
4$: CMP RG, (R2) sRESULT OK ? 
BEQ 181323 BR IF YES 
MOV (R2),R3 3;GET THE WAS DATA 
5$: ERROR 1 :COM DELIVERED THE WRONG RESULT 


“*@eeeeeeeeeeeteneteteeeeeeetetereraRereeteteeteneteeeeteeetereeese 


SeTEST 323 INC DM1 TEST = N:C = 1011 


pp eeeeererererererrrreerrtrrreereeerrereeneneKKeeeaReKereeAAAR TAT 


181323: 


SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #323,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

CLR R4 ;RESULT S / B = 000000 

MOV #-1,(R2) :CDESTJ] = 177777 

ccc sCLEAR CODES 

273 sN:C = 1011 
2s: INC (R2) ; TEST THE INC 

BM] 3$ 3N:C = 0101 ? 

BNE 3$ 

BVS 3$ 

BCS 4$ 
3$: ERROR 1 s INC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 

BEQ 181324 3;BR IF YES 

MOV (R2),R3 3;GET THE WAS DATA 
5$: ERROR 1 s INC DELIVERED THE WRONG RESULT 
speeeererererereereetertrrerererrereneereneeteneeeenesereeeeTeees 
s*TEST 324 INC DM1 TEST = N:C = 0100 
sp eererevererrrrrerererrerererereseeeeeneneeeeenaeeseeeeeseare eee 
181324: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #324,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFC,R2 :DEST ADDR = MBUFO 


SEQ 0127 
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022126 


022140 
022142 
022144 


022146 
022150 


022152 


022200 
022202 
022204 
022206 
022210 
022212 
022214 
022216 
022220 


022222 
022224 


022226 


022250 
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005212 
100003 


103001 


104001 
020412 
001402 


011203 
104001 


000004 


000273 
005312 


100403 
001002 
102401 
103401 


104001 
020412 
001402 


011203 
104001 





woo 


000325 
022202 
063312 


000001 


000326 


100000 


L 10 

MACY11 30A(1052) T1-SEP-79_ 13:53 PAGE 129 
1324 INC DMI TEST = N:C = 0100 

MOV #100000 ,R4 RESULT S$ / B = 100000 

MOV #77777, (R2) sCDESTI] = 77777 

ccc ;CLEAR CODES 

264 zN:C = 0100 
23: INC (R2) ;TEST THE INC 

BPL 3% zN:C = 1010 ? 

BEQ 3$ 

BvC 3$ 

BCC 4$ 
3$: ERROR 1 : INC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) ;RESULT OK ? 

BEQ T$1325 ;;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ; INC DELIVERED THE WRONG RESULT 
ppteeewereceererecerererereeerereeteteeeeeeneeetenteneeeeTeneeete 
*TEST 325 DEC DM1 TEST - N:C = 1011 


s,eeeeeereeeeerereeeeeeerretetererereteraeaeeeetenerenetetetenentes 


181325: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #325,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, R2 ;DEST ADDR = MBUFO 
CLR R4 sRESULT S / B = 000000 
MOV #1,(R2) =(DEST] = 1 
ccc ;CLEAR CODES 
273 3N:C = 1011 
23: DEC (R2) sTEST THE DEC 
BM] 3$ sN:C = 0101 ? 
BNE 3$ 
BvSs 3$ 
BCS 4% 
3$: ERROR 1 :DEC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) ;RESULT OK ? 
BEQ 781326 7;BR IF YES 
MOV (R2),R3 3;GET THE WAS DATA 
5$: ERROR 1 :DEC DELIVERED THE WRONG RESULT 
sp eereererereerererererrerererreneeereeenereeeneeneeeeeeeeneeeees 
s*TEST 326 DEC DM] TEST - N:C = 1100 
Meee eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeteeteeeeeaeeteteeeeerteraeeeese 
181326: 
SCOPE ¢ CALL THE SCOPE LOOP UTILITY 
MOV #326,R0 LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 + OAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #77777,R4 sRESULT S / B = 77777 


MOV #100000, (R2) :CDESTJ = 100000 


SEQ 0128 
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022254 
022256 


022260 


022262 
022264 


022266 
022270 
022272 
022274 
022276 


022300 
022302 


022304 


022330 
022332 
022334 
022336 
022340 
022342 
022344 
022346 
022350 


022352 
022354 


022356 


022404 


11-SEP-79 


000257 
000274 


005312 
100403 


103001 
104001 
020412 
001402 


011203 
104001 


BS rae 


000257 
005312 
100003 
001402 
102401 
103001 
104001 
020412 
001402 


011203 
104001 


000004 


000270 


13:31 


000327 
022332 
063312 
177777 


000330 
022406 
063312 


100000 
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1326 DEC DMI TEST - N:C = 1100 SEQ 0129 

ccc ;CLEAR CODES 

274 3N:C = 1100 
2$: DEC (R2) s TEST THE DEC 

BM] 3$ 3N:C = 0010 ? 

BEQ be 

Bvc 3$ 

BCC 4% 
3$: ERROR 1 :DEC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) ;RESULT OK ? 

BEQ 181327 7;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 :DEC DELIVERED THE WRONG RESULT 
oa Ti oe a en aint Ot ar be gle Taga meta hte ae iat ib re, 
s*TEST 327 DEC DM1 TEST - N:C = 0000 
Spe eeeeeeereeeerrereeeetereereree eee eeeAKAAARKAAAKeAAAALeLAAAAes 
181327: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #327,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO, R2 :DEST ADDR = MBUFO 

MOV #-1,R4 sRESULT S / B = 177777 

CLR (R2) :CDESTJ = 000000 

ccc ;CLEAR CODES 
2$: DEC (R2) sTEST THE DEC 

BPL 3$ iN:C = 1000 ? 

BEQ 3$ 

BvSs 3$ 

BCC 4$ 
3$: ERROR 1 sDEC FAILED TOC ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 

BEQ 781530 7:BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 :DEC DELIVERED THE WRONG RESULT 
sp eeeeerererererererrrerreetrererereeeeeeeReKeeeeAAeeAAeeeAA ERTS 
:*TEST 330 ASL DM1 TEST - N:C = 1000 
ppererererererererererertrrererereerieeeeeeeeeeeeee eee Ae 
181330: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #330,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV wHBUFO, R2 :DEST ADDR = Ray’ 

CLR RESULT S$ / 000000 

MOV #100000, (R2) = CDES 1) = 1000 00 

ccc :CLEAR CODES 

SEN N:C = 1000 


n 10 
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CQKDAD.P11 11-SEP-79 13:31 1330 ASL DM1 TEST - N:C = 1000 SEQ 0130 
Pb 022406 006312 23: ASL (R2) sTEST THE ASL 
6905 022410 100403 BM 3$ NC = O111 ? 
6906 022412 001002 BNE 3$ 
6907 022414 102001 BvC 3$ 
“ 022416 103401 BCs 4% 
6910 022420 104001 38: ERROR 1 SASL FAILED TO ALTER THE CODES PROPERLY 
6911 022422 020412 4$: CMP R4, (R2) sRESULT OK ? 
4 022424 001402 BEQ 781331 ;;BR IF YES 
6914 022426 011203 MOV (R2),R3 :GET THE WAS DATA 
2b, 022430 104001 5$: ERROR 1 sASL DELIVERED THE WRONG RESULT 
6917 er 
6918 s*TEST 331 ASL DM1 TEST - N:C = 0101 
6919 pp eeeeererererererererererreretererenerereaeeteeeneeeeeeneeeernee 
6920 022432 TST331: 
6921 022432 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
6922 022434 012700 900331 MOV #331,R0 7:;LOAD RO WITH TEST NUMBER 
6923 022440 013701 022464 MOV a#2$,R1 LOAD R1 WITH rest INSTRUCTION WORD 
6924 022444 012702 063312 MOV #MBUFO,R2 :DEST ADDR = MBUFO 
6925 022450 012704 100000 MOV #100000,R4 sRESULT S / B = 100000 
6926 022454 012712 040000 MOV #40000, (R2) :(DEST) = 40000 
6927 022460 000257 ccc =CLEAR CODES 
ry 022462 000265 265 :N:C = 0101 
oh 022464 006312 2$: ASL (R2) :TEST THE ASL 
6932 022466 100003 BPL 3$ zN:C = 1010 ? 
6933 022470 001402 BEQ 3$ 
6934 022472 102001 BvC 3$ 
ot 022474 103001 BCC 4% 
6937 022476 104001 3$: ERROR 1 SASL FAILED TO ALTER THE CODES PROPERLY 
6938 022500 020412 4$: CMP R4, (R2) RESULT OK ? 
by 022502 001402 BEQ 781332 ;:;BR IF YES 
6941 022504 011203 MOV (R2),R3 GET THE WAS DATA 
-_ 022506 104001 5$: ERROR 1 SASL DELIVERED THE WRONG RESULT 
oak _T pando aetanetatae tong eth eget gael eal aga IP Nala aeaaaatacealadl 
6945 :*TEST 332 ASL DM1 TEST - N:C = 0010 
6946 speereererrerrerereererterereererrereereeReeeeeeee eee eee ee RTT 
6947 022510 181332: 
6948 022510 000004 SCOPE 7 CALL THE SCOPE LOOP UTILITY 
6949 022512 012700 000332 MOV #332,R0 ;LOAD RO WITH FEST NUMBER 
6950 022516 013701 022536 MOV a#2$,R1 >LOAD R1 WITH 16s} “INSTRUCTION WORD 
6951 022522 012702 063312 MOV #MBUFO,R2 :DEST ADDR = MBUFO 
6952 022526 005004 CLR R4 sRESULT S / B-= 000000 
6953 022530 005012 CLR (R2) :CDESTJ = 000000 
6954 022532 000257 CCC CLEAR, CODES ath - 
444 022534 000262 SEV *0010 — 
mS (4 
34 022536 006312 2%: ASL (R22), sTEST THE ASL oP Ao 
6 P 


CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 11-SEP-7 
6959 022540 100403 
6960 022542 001002 
6961 022544 102401 
6962 022546 105001 
6965 
6964 022550 104001 
6965 022552 020412 
6966 022554 001402 
6967 
6968 022556 011203 
6969 022560 104001 
6970 
6971 
6972 
6975 
6974 022562 
6975 022562 000004 
6976 022564 012700 
6977 022570 013701 
6978 022574 012702 
6979 022600 012704 
6980 022604 012712 
6981 022610 000257 
6982 022612 000275 
6983 
6984 022614 006112 
6985 
6986 022616 100403 
6987 022620 001402 
6988 022622 102001 
6989 022624 103401 
6990 
6991 022626 104001 
6992 022630 020412 
6993 022632 001402 
6994 
6995 022634 011203 
6996 022636 104001 
6997 
6998 
6999 
7000 
7001 022640 
7002 022640 000004 
7003 022642 012700 
7004 022646 013701 
7005 022652 012702 
7006 022656 012704 
7007 022662 012712 
7008 022666 000257 
M44 022670 000265 
7011 022672 006112 
7012 
7013 022674 100003 
7014 022676 001402 


000333 


125252 


MACY11 30A(1052) 11-SE 
1332 ASL DMI TEST - 
BM] 3$ 
BNE 3$ 
BvS 3$ 
BCC 4% 
3$: ERROR 1 
4$: CMP R4,(R2) 
BEQ 181333 
MOV (R2),R3 
5$: ERROR 1 


s*TEST 333 ROL DMI 


;, eeeeerererererererere 


1§1333: 


3 ASL +e TO ALTER THE CODES PROPERLY 
ESULT OK 
BR IF rES. 


;GET THE WAS DATA 
7ASL DELIVERED THE WRONG RESULT 


fererererrerrereraererenererteneereneneeaeeeee 


TEST = N:C = 1101 


eerteererrerrererrrereraeraeeterteteeeeeeneereee 


;CALL THE SCOPE LOOP UTILITY 
:;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 


MOV #MSuUFO, R2 sDEST ADDR = MBUF 0 

MOV #52525,R4 RESULT S / B = 52525 

MOV #125252, (R2) ;CDEST) = 128252 

ccc > CLEAR CODES 

275 sN:C = 1101 
2%: ROL (R2) ; TEST THE ROL 

BM1 3$ = 0011 7? 

BEQ 3$ 

BvCc 3$ 

BCS 4% 
3$: ERROR 1 sROL FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 

BEQ 181334 ssO8 if ves 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 sROL DELIVERED THE WRONG RESULT 
sp eeeerereererererrserererererereresareraeneeeeeneeseneneereneeete 
s*TEST 334 ROL DM1 TEST - N:C = 0101 
sp eetereecerererererrerererrerererererereeeeeesenereranerereseresese 
TS1334: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 


MOV #MBUFO 


MOV #125253, 
MOV #52525, 
CCC 
265 

2$: ROL (R2) 
BPL 3$ 
BEO 3% 


;;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 
R2 ;DEST uwt —— 


RG sRESULT S / B = 125253 
(R2) tie s $28 25 
R CODES 
zN:C = 0101 
sTEST THE ROL 
sN:C = 1010 ? 


: 


ee 


CQKDA-D KDI1-K 
CQKDAD.P11 


7015 022700 
7016 022702 


7020 022710 


7022 022712 
7023 022714 


7028 022716 


7035 022740 
7036 022742 


7038 022744 
7040 022746 


7043 022754 
7045 022756 
7046 022760 
7047 022762 


7049 022764 
7050 022766 


7055 022770 


7063 023020 
7065 025022 
7067 023024 


7070 025032 


BASIC L 
11-SEP-7 
2001 

i 


000262 
006112 


100403 
001002 
102401 
103001 


104091 
020412 
001402 


011203 
104001 


100003 
001402 
102001 
103001 


000335 
022744 
063312 


000336 


077777 
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1334 ROL OMI TEST = W:C = 0101 

BvCc 3$ 

BCC oS 
3$: ERROR i 7 ROL 4 TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) :RESULT 0 ? 

BEQ T$1335 :3BR if ES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ROL DELIVERED THE WRONG RESULT 
PpeeeeeneeereencererrerererereerererererenereneeererterersrererTs 
s*TEST 335 ROL DM! TEST - N:C = 0010 


ppereerrererererrerererrrrreeterererereenaeeereneeaneeenTareTeeee 


181335: 
$ 


COPE CALL THE SCOPE LOOP UTILITY 
MOV #335,R0 7;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = Raw 
CLR RG ; RESULT s/ 000000 
CLR (R2) ;(DESTI = 000000 
ccc ee ie CODES 
SEV = 0010 
2%: ROL (R2) ; TEST THE ROL 
BMI 3$ 3N:C = 0100 ? 
BNE 3$ 
BVS 3$ 
BCC 4$ 
3$: ERROR 1 ROL FAILED Tit + *-:. THE CODES PROPERLY 
4%: CMP R4,(R2) RESULT OK ? 
BEQ 181336 7;BR IF YES 
MOV (R2),R3 GET THE WAS DATA 
5$: ERROR 1 ROL DELIVERED THE WRONG RESULT 


sp eeeeerenrereererrereerrerererererenteneereneeteneaseeeeneATTeES 


;*TEST 336 ADC DM1 TEST = N:C = 0101 


Meee eeeeetereeeeeeeeeeeeereeeetetetekteteneeeeneeteeeeeeneterenese 


TS13*6: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #336,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #100000 ,R4 sRESULT S / ° 100000 
MOV #77777, (R2) (DEST) = 777 77 
ccc ;CLEAR CODES 
265 :N:C = 0101 
2$: ADC (R2) s TEST THE ADC 
BPL 3$ 3N:C = 1010 ? 
BEQ 3$ 
Bvc 3$ 
BCC 4$ 


SEQ 0132 


CQKDA-D KDI1-K 
CQKDAD.P11 


7072 023034 
7073 023036 
7074 023040 


7076 023042 
7077 023044 


066 
7089 023072 
7090 023074 


7092 023076 


023150 
023152 


025154 
023156 


023164 
023166 


PRORSRE PEPE ROK, — se se es ss ss ss 


BASIC 
11-SEP- 


104001 
020412 
001402 


011203 
104001 


000275 
005512 
100403 


103401 


104001 
020412 
001402 


011203 
104001 


100003 
001402 
102401 
103001 


104001 


OGIC 
9 


€ TESTS 
13:31 


000337 
023076 
063312 


177777 


000340 
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1336 ADC DMI TEST - N:C = 0101 SEQ 01335 
3$: ERROR 1 3; ADC FAILED | TO ALTER THE CODES PROPERLY 
4%: CMP RG, (R2) =RESULT OK ? 

BEQ 181337 > BR IF YES 

MOV (R2),R3 7GET THE WAS DATA 
5$: ERROR 1 sADC DELIVERED THE WRONG RESULT 
p,eetererererererrerrerrerererereerereeereeeeeeeereteneneteeeretee 
s*TEST 337 ADC DMI TEST = N:C = 1011 


ps, eetetererereerereererrrererrerereeerererereneneeneeeetereeeTAeee 


181337: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #337,R0 7;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, R2 :DEST ADDR = r¥ FO 
CLR RG RESULT s / = 000000 
MOV #=1,(R2) ; (DEST) = 177797 
ccc ;CLEAR CODES 
273 N:C = 1011 
23: ADC (R2) : TEST THE ADC 
BM] 3$ 3N:C = 0101 ? 
BNE 3$ 
Bvs 3$ 
BCS 4% 
3$: ERROR 1 sADC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 
BEQ 781340 7:BR IF YES 
MOV (R2),R3 3GET THE WAS DATA 
5$: ERROR 1 sADC DELIVERED THE WRONG KESULT 
° seererereregerereaerererrerertesesereseneratanesesenerenesaenerenes 
eTEST 340 - ADC DM] TEST - N:C = 1010 
**@eetaeeeeeeereteteeeteeete teeter eeeetaeeneeeeeeneeaeneeeneeeeeeteneeeee 
151340: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #340,R0 7;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, R2 ;DEST ADDR = MBUF 
MOV #-1,R4 sRESULT S / 8B = 177777 
MOV #-1,(R2) sCDESTJ] = 177777 
CCC :CLEAR CODES 
2? zN:C = 1010 
2s: ADC (R2) sTEST THE ADC 
BPL 3$ 7N:C = 1000 ? 
BEQ 3$ 
BvS 3$ 
BCC 4% 


3$: ERROR 1 ;ADC FAILED TO ALTER THE CODES PROPERLY 


CQKDA-D KDI1-K BASIC LOGIC TESTS 


COKDAD.P11 


023170 
023172 


023174 
023176 


023226 
023230 
023232 
023234 
023236 
023240 
023242 
023244 
023246 


023250 
023252 


023254 


023304 
023506 
023310 


023316 


023320 
023322 
023324 


11-SEP-79 13:31 


020412 
001402 


011203 
104061 


000004 


000273 
005612 
100403 


103001 
104001 
020412 
001402 


011203 
104001 


005612 
100403 


103001 


104001 
020412 
001402 


000341 
023230 
063312 


000001 


000342 


100000 
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1340 ADC DMI TEST = N:C = 1010 
4%: CMP RG, (R2) sRESULT OK ? 
BEQ TS$1341 77;BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
5%: ERROR 1 ;ADC DELIVERED THE WRONG RESULT 
pe eeeeerererererrereeererererererereTeteteeerereeneeeeeereneeeee 
 STEST 341 SBC OM! TEST = N:C = 1011 
*“s@#@eeeereeeeeeeeteerererreeeereerereeeeteeeeeeeneeaneteneeeeeeeneeeee 
151341: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #341,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH Ld § INSTRUCTION WORD 
MOV ats. R2 sDEST ADDR = MBUFO 
CLR sRESULT S / 5 000000 
MOV i. (R2) ;CDESTJ = 
CCC ; CLEAR Coes 
273 =N:C = 1011 
23: SBC (R2) sTEST THE SBC 
BM] 3$ 3N:C = 0100 ? 
BNE 3% 
BvS 3$ 
BCC 4% 
3$: ERROR 1 ;SBC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 
BEQ T$1342 3;7BR IF YES 
MOV (R2) ,R3 ;GET THE WAS DATA 
5$: ERROR 1 ;SBC DELIVERED THE WRONG RESULT 
s petereeerreerrerereeerereeeretrererereetetertereneenteneeneeaeeenee 
:eTEST 342 SBC DM1 TEST - N:C = 0101 
*“*s@eaeetetaerereete ree eetenterteeeeeeteeeeteeeaeeeeeeeeeneeeaeneeeeeeeeee 
181342: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #342,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #077777,R4 sRESULT S / B = 077777 
MOV #100000, (R2) ;CDESTJ = 100000 ‘ 
CCC CLEA R CODES 
265 3N:C = 0101 
2$: SBC (R2) :TEST THE SBC 
BM] 3% 3N:C = 0010 ? 
BEQ 3% 
BvC 3$ 
BCC 4% 
3$: ERROR 1 3; SBC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP RG, (R2) =RESULT OK 
BEG 181543 > BR IF ES. 


SEQ oc | 


CQKDA-D KD11-K BAS] 
COKDAD.P11 


023362 
023364 
023366 


023374 


023376 
023400 
023402 


023404 
023406 


023410 
023410 


023436 
023440 


023442 
023444 
023446 
023450 


023452 
023454 
023456 


023460 


Cl 
11-SEP-7 


005612 
100403 


103001 
104001 
020412 
001402 


011203 
104001 


000004 


000267 
005612 


100003 
001402 
102401 
103401 


104001 
020412 
001402 


011203 


000343 
023364 
063312 
000001 
000001 


000344 
023440 
063312 
177777 


F 1) 
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342 SBC DOM! TEST = N:C 01 
MOV (R2) R35 ;GET THE WAS DATA 
5$: ERROR 1 ;SBC DELIVERED THE WRONG RESULT 


;, eeeterererrerereesereerrerereereerererenenenereeeeeeeeeeeTeTete 


seTEST 343 SBC OMI TEST = N:C = 1110 


ps eeeererererererrrerererererererereerereseeeeeeeteneteneereretee 


181345: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #343,R0 . + LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 DEST ADDR = MBUFO 

MOV #1,R4 RESULT §$/B8=1 

MOV #1, (R2) :CDEST) = 1 

ccc ;CLEAR CODES 

276 sN:C = 1110 
2%: SBC (RZ) sTEST THE SBC 

BM] 3% 3N:C = 0000 ? 

BEQ 3$ 

Bvs 3$ 

BCC 4$ 
3$: ERROR 1 :SBC FAILED TO ALTER THE CODES PROPERLY 
4%: CMP R4,(R2) sRESULT OK ? 

BEQ TS1344 ;:BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;SBC DELIVERED THE WRONG RESULT 
street erereerererrersereretetetatetetetingneraeeeneeneneranerenese 
s*TEST 344 SBC DM1 TEST - N:C = 0111 
*“*@eanweetaeerernereteeteteetatrerekteeeeeeeeeeeneaeeaeeteneaeaetenaetenereneet 
151344: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOY #344,R0 >;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #-1,R4 sRESULT S / B = 177777 

CLR (R2) ;CDEST] = 000000 

ccc sCLEAR CODES 

267 3N:C = 0111 
2$: SBC (Re) sTEST THE SBC 

BPL 3$ 3N:C = 1001 ? 

BEQ 3$ 

Bvs 3$ 

BCS 4% 
3$: ERROR 1 ;SBC FAILED TO ALTER THE CODES PROPERLY 
4$: CMP R4,(R2) sRESULT OK ? 

BEQ 181345 :;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 


SEQ 0135 


a a se 


way 
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COKDAD.P11 = 11-SEP-79 13:31 1344 SBC DMI TEST = N:C = O111 SEQ 0136 | 
| 
7339 023462 104001 5$: ERROR 1 :$BC DELIVERED THE WRONG RESULT 
7241 ee ee ae 
7242 s*TEST 345 NEGB - MODE 0 TEST - N:C = 0110 
7243 ppt eeeeeeerrrerrrerereerrereeeeretererrereeereeanenenTeetereeLeTee 
7244 023464 TS1345: 
7245 023464 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7246 023466 012700 000345 MOV #345,R0 ::LOAD RO WITH TEST NUMBER 
7247 023472 013701 023512 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
72468 023476 012704 177776 MOV #177776, RG RESULT S / B = 376 (LO BYTE) 
7249 023502 012703 177402 MOV #177602.R3 :(DEST) = 177402 
7250 023506 000257 CCC CLEA R FLAGS 
7251 023510 000266 266 =N:C = 0110 
7258 023512 105403 2%: NEGB RB :TEST THE NEGB 
7255 023514 100003 BPL 3$ ZN:C = 1001 
7256 023516 001402 BEQ 3$ 
7257 023520 102401 BVS 3$ 
7258 023522 103401 BCS 4$ 
Loos 023524 104002 3$: ERROR 2 ;NEGB FAILED TO ALTER CODES PROPERLY 
7262 023526 020403 4$: CMP R4,R3 sCORRECT RESULT ? 
ose? 023530 001401 BEQ 181346 ;;BR IF YES 
pone 023532 104002 5$: ERROR 2 :NEGB DELIVERED THE WRONG RESULT 
7507 ppeewerererererererereerereteretentereneetaeennenereneterereneres 
7268 s*TEST 346 NEGB - MODE 0 TEST - N:C = 0011 
7269 spteeeererereererarerrerereeererenerereeeneeeraneRaeeserereneteTe 
7270 023534 181346: 
7271 023534 000004 SCOPE sCALL THE SCOPE LOOP UTILITY 
7272 023536 012700 000346 MOV #346,R0 3;LOAD RO WITH TEST NUMBER 
7273 023542 013701 023562 MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
7274 023546 012704 177400 MOV #177400, RG sRESULT S / B = 000 (LO BYTE) 
7275 023552 012703 177400 MOV #177400.R3 :(DEST) = 177400 
7276 023556 000257 CCC “CLEAR FLAGS 
7277 023560 000263 263 “N:C = 0011 
7279 023562 105403 2$: NEGB RB :TEST THE NEGB 
7281 023564 100403 BM] 3$ :N:C = 0100 
7282 023566 001002 BNE 3$ 
7283 023570 102401 BVS 3$ 
7284 023572 103001 BCC 4$ 
oat 023574 104002 3$: ERROR 2 sNEGB FAILED TO ALTER CODES PROPERLY 
7288 023576 020403 4$: CMP R4,R3 ;CORRECT RESULT ? 
7289 023600 001401 BEQ 1$1347 ::BR IF YES 
fal 023602 104002 5$: ERROR 2 :NEGB DELIVERED THE WRONG RESULT 


7293 : s SUTHERESERRESRSSTSSRSSISRSTELSNSSeLENETHeONsERSETeLSeTeNNIINEN 


729% TeTEST 347 NEGB - MODE 0 TEST - N:C = 1101 


Vo > — —_ --2O0AvrOrOrowownssas>un rr — — 
a 


CQKDA-D KDI1-K BASIC L ot 
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023630 
023632 
023634 
023636 
023640 
023642 
023644 


023646 
0236506 


023652 


023654 
023654 


023700 
023702 
023704 


023712 
023714 


023716 
023720 


023722 


023724 
023724 
023726 


11-SEP- 


105403 


100003 
001402 
102001 
103401 


104002 


020403 
001401 


104002 


000004 
012700 
013701 
012704 
012703 
000257 
000273 


105003 
100403 
001002 
102401 
103001 
104002 


020403 
001401 


104002 


000004 
012700 


177600 


000350 
023702 
177400 
177777 


000551 
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1347 NEGB - MODE 0 TEST - N:C = 1101 


sy eeeerrereererrererererserrreererererereneeterresenetereneeeTeTe 


181347: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #347,R0 >; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 3; LOAD + wITH TEST ee WORD 

MOV #177600,R4 sRESULT S / B = 200 (LO BYTE) 

MOV #177600,R3 ‘tDeST) 2 177600 

ccc CLEA R FLAGS 

275 sN:C = 1101 
2$: NEGB R3 ;TEST THE NEGB 

BPL 3$ sN:C = 1011 

BEQ 3$ 

BvCc 3$ 

BCS 4$ 
3$: ERROR 2 ;NEGB FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,R3 sCORRECT RESULT ? 

BEQ 181350 > BR IF YES 
5$: ERROR 2 ;NEGB DELIVERED THE WRONG RESULT 
*“*@eeeeeeereeeeerneretetereteeeeteteereeeeeeetetaeeeeneenteetetenetene 
:eTEST 350 CLRB - MODE 0 TEST - N:C = 1011 
“*@eeeeetetereereeeeteeteereteeteetteeteeteeeteteneneeeeeeneneteetetetese 
151350: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #350,R0 >;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #177400,R4 sRESULT S / B = 000 (LO BYTE? 

MOV #-1,R3 ageest = 177777 

CCC sCLEAR FLAGS 

273 sN:C = 1011 
es: CLRB R3 sTEST THE CLRB 

BM] 3$ 3N:C = 0100 ? 

BNE 3$ 

BvS 3% 

BCC 4% 
3$: = ROR 2 sCLRB FAILED TO SET CODES PROPERLY 
4%: CMP R4,R3 sRESULT CORRECT ? 

BEQ 181351 3;BR IF YES 
5$: ERROR 2 :CLRB DELIVERED THE WRONG RESULT 
sp eeeeccecerrenesesseeseeseerereereretessenesaseseneseseeeeeseele 
s*#TEST 351 CLRB - MODE O TEST - N:C = 0100 
ssteeeeerecerereseereerecerensereeetereeneegooesesasenonelesellees 
181351: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #351,R0 >;L0AD RO WITH TEST NUMBER 


SEQ 0157 


— — ————— LT 


CQKDA-D KDI1-K 
CQKDAD.P11 


7351 023732 


7355 023750 
7357 023752 
7359 023754 
7360 023756 
7361 023760 
7362 023762 
7364 023764 


7366 023766 
7367 023770 


7369 023772 


7374 023774 


7383 024030 
7385 024032 


7387 024034 
7388 024040 


7390 024042 


7392 024044 
7393 024046 


7395 024050 
7396 024052 


7401 024054 
7402 024054 
7403 024056 
7404 024062 
7405 024066 
7406 024072 


BASIC L 
11-SEP-7 


013701 


000264 
105003 
100403 
001002 
102401 
103001 
104002 


020403 
001401 


104002 


022703 
001401 


104005 


020415 
001402 


011503 
104001 


Oo 
== 


000352 


063312 
177777 


063314 
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1351 CLRB = MODE 0 TEST - N:C = 0100 
MOV a#2$,R sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV 3197400, RS [RESULT Ss / Be COO (.0 BYTE) 
MOV #-1,R3 ;CDEST) = 7777 
ccc One ge nes. 
SEZ = 0100 
23: CLRB R3 sTEST THE CLRB 
BM] 3% 3N:C = 0100 ? 
BNE 3$ 
Bvs 3$ 
BCC 4% 
3$: ERROR 2 ;CLRB FAILED TO SET CODES PROPERLY 
4%: CMP R4,R3 ;RESULT CORRECT ? 
BEQ TS1T352 >: BR IF YES 
5$: ERROR 2 ;CLRB DELIVERED THE WRONG RESULT 


se eeeerererereneerererereererereneeeteneareeeeeneeeneeneeeeerene 


s*TEST 352 CLRB TEST - DM2 - ODD ADDRESS 


sy eeeeerererereereeereeretertetreneeenteeeeareKeeeneeneaneeeenenes 


151352: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #352,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO+1,R2 ;DEST ADDR = MBUFO+1 
MOV #377 ,R4 RESULT S$ / B = 377 
MOV #MBUFO,RS :POINT R5 TO CHECK RESULT 
MOV R2,R3 3R3 CONTAINS DEST ADDR 
MOV #-1,(R5) ;CDEST] = 177777 
ccc ;SCOPE SYNC 
2$: CLRB (R3)+ ; EST THE CLRB 
CMP #MBUFO+2,R3 ;D1D DEST REG GET INCREMENTED ? 
BEQ 4$ BR IF YES 
3$: ERROR 5 ;CLRB FAILED 10 UPDATE DEST REG 
4$: CMP R4, (RS) ;CORRECT RESULT ? 
BEQ 181353 ::BR IF YES 
MOV (R5),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;CLRB DELIVERED WRONG RESULT 
sp eeeeenecercaerserrererererereereeererreneeneenenenenenserenenteses 
seTEST 353 CLRB TEST = DMI = ODD ADDRESS 
sp eeeeeererseecceererseneceseesesserereseenseseeneseteeresaaeneeese 
181355: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #353,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO+1,R2 DEST ADDR = MBUFO+! 
MOV #377,R4 RESULT S / B = 377 


J 


J 1 
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CQIKDAD.P11 11-SEP-79 13:31 1353 CLRB TEST = DMI = ODD ADDRESS SEQ 0139 
7407 024076 012705 063312 MOV #mBurO.RS ;POINT RS TO CHECK RESULT 
7408 024102 010205 MOV R2,R3 3R3 CONTAINS DEST ADDR 
7409 026106 012715 177777 MOV #-1,(R5) (DEST) = 177777 
Dt 024110 000257 ccc ;SCOPE SYNC 
meat 024112 1050135 23: CLRB (R3) : TEST THE CLRB 
7414 024114 020415 CMP RG, (RS) ;CORRECT RESULT ? 
rata 024116 001402 BEQ 1$1354 7:BR IF YES 
7417 024120 011503 Mov (R5),R3 :GE1 THE WAS DATA 
ee 024122 104001 3$: ERROR 1 :CLRB DELIVERED WRONG RESULT 
7420 ppeteeeeereerrreereeeeerereereeeeeeereeeeeeeeeeeeeeetentereeTetes 
7421 s*TEST 354 CLRB TEST - DM2 - EVEN ADDRESS 
7422 spe eeeeeerererrererrereeererreeteeeerereeeeeeeeeeneerereneeeTere 
7423 024124 1$1354: 
7424 024124 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7425 024126 012700 000354 MOV #354,R0 ::LOAD RO WITH TEST NUMBER 
7426 024132 013701 024156 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
7427 024136 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
7428 024142 012704 177400 MOV #177400,R4 sRESULT S / B = 177400 
7429 024146 010203 MOV R2,R3 3R3 CONTAINS DEST ADDR 
7430 024150 012712 177777 MOV #-1,(R2) ;CDEST) = 177777 
ot 024154 000257 ccc ;SCOPE SYNC 
pete 024156 105023 2s: CLRB (R3)+ sTEST THE CLRB 
4 

7435 024160 022703 063313 CMP #MBUFO+1,R3 3D1D DEST REG GET INCREMENTED ? 
oe 024164 001401 BEQ 4% ;BR IF YES 
nt 024166 104005 3$: ERROR 5 ;CLRB FAILED TO UPDATE DEST REG 

4 
7440 024170 020412 4$: CMP R4,(R2) sCORRECT RESULT ? 
ort} 024172 001402 BEQ 781355 3:BR IF YES 

44 
7443 024174 011203 MOV (R2),R3 ;GET THE WAS DATA 
pad 024176 104001 5$: ERROR 1 ;CLRB DELIVERED WRONG RESULT 

4 
ine peeeeeerenerertenerereeterreereereeeteeeA Aree tee eee TATA ATES 
7447 ;*TEST 355 CLRB TEST - DM1 - EVEN ADDRESS 
7448 ppeeeeeterererertreeereeerenetteerererereeeteeneeeeeeeeeeee Rese 
7449 024200 181355: 
7450 024200 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
7451 024202 012700 000355 MOV #355,R0 7:;LOAD RO WITH TEST NUMBER 
7452 024206 013701 024232 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
7453 024212 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
7454 024216 012704 177400 MOV #177400,R4 ;RESULT S / B = 177400 
7455 024222 010203 MOV R2,R3 3R3 CONTAINS DEST ADDR 
7456 024224 012712 177777 MOV #-1,(R2) sCDEST) = 177777 
ee 024230 000257 ccc ;SCOPE SYNC 

4 
be 024232 105013 2$: CLRB (R3) TEST THE CLRB 

46 
7461 024234 020412 CMP R4,(R2) sCORRECT RESULT ? 
7462 024236 001402 BEQ 181356 7:BR IF YES | 
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55 CLRB TEST = DMI - EVEN ADDRESS SEQ 0140 

7463 
74664 024240 011205 MOV (R2),R3 ;GET THE WAS DATA 
ree 024242 104001 3$: ERROR 1 ;CLRB DELIVERED WRONG RESULT 
7467 ppeteererrererererrererereecerereererererretereeeeetereteneeteere 
7468 :*TEST 356 NEGB TEST = DM2 = ODD ADDRESS 
7469 pperteeererrerereerererererreererererereereneeeterteneeterereretes 
7470 024244 1TS1356: 
7471 024244 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
7472 024246 012700 000356 MOV #356,R0 >;LOAD RO WITH TEST NUMBER 
7473 024252 013701 024302 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
7474 024256 012702 063313 MOV #MBUFO+1,R2 DEST eye MBUF 0+3 
7475 024262 012704 000777 MOV #777,R4 sRESULT S / B = 777 
7476 024266 012705 063312 MOV #MBUFO,RS POINT R5 TO CHECK RESULT 
7477 =024272 010203 MOV R2,R3 7R3 CONTAINS DEST ADDR 
7478 024274 012715 177777 MOV 6-1, (R5) :CDESTJ = 177777 
p44 024300 000257 ccc ;SCOPE SYNC 
oy $3 024302 105423 2$: NEGB (R3)¢ ; TEST THE NEGB 
7483 0243046 022703 063314 CMP #MBUFO+2,R3 :DID DEST REG GET INCREMENTED ? 
eo} 024310 001401 BEQ 4$ ;BR IF YES 
near 024312 104005 3$: ERROR 5 :NEGB FAILED TO UPDATE DEST REG 
7488 024314 020415 4%: CMP RG, (RS) ;CORRECT RESULT ? 
44 024316 001402 BEQ 1$1357 7;BR IF YES 
7491 024320 011503 MOV (R5),R3 ;GET THE WAS DATA 
eps 024322 104001 5$: ERROR 1 :NEGB DELIVERED WRONG RESULT 
maga ppteeeeteetrereeeetererereterrerertertteeeKeeeeReeKeeeeNere Tees 
7495 s*TEST 357 NEGB TEST - DMi - ODD ADDRESS 
7496 speeeenerenererererereererereeterrteteeetee eee eee eATe eee Eee 
7497 024324 181357: 
7498 024324 000004 SCOPE poy THE SCOPE LOOP UTILITY 
7499 024326 012700 000357 MOV #357,R0 ;LOAD RO WITH TEST NUMBER 
7500 024332 013701 024374 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
7501 -SBITL USER CONTROLLED BREAKPOINT -- BIT7 
7502 024336 032737 000200 063234 BIT tds Q@#BPTLOC ;BREAKPOINT HALT SET ?? 
7503 024344 001401 BEQ . :BR IF NOT 
7504 024346 000000 HALT ;BREAK = DEPRESS CONTINUE TO RESTART 
7505 024350 012702 063313 MOV #MBUFO+1,R2 :DEST ADDR = MBUFO+1 
7506 024354 012704 000777 MOV #777,R4 RESULT S$ / B = 777 
7507 024360 012705 063312 MOV #MBUFO,R5 :POINT R5 TO CHECK RESULT 
7508 024364 010203 MOV R2,R3 :R3 CONTAINS DEST ADDR 
7509 024366 012715 177777 MOV #-1,(R5) :CDEST] = 177777 
he 024372 000257 ccc ; SCOPE SYNC 
raat 024374 105413 2$: NE GB (R3) ;TEST THE NEGB 
7514 024376 020415 CMP R4,(R5) sCORRECT RESULT ? 
Hf 024400 001402 BEQ 181360 3;BR IF YES 

6 


7517 024402 011503 MOV (R5),R3 GET THE WAS DATA 
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024404 


024406 
024406 
024410 
024414 
024420 
024424 
024430 
024432 
024436 


024440 


024442 
024446 


024450 


024452 
024454 


024456 
024460 


024462 


024512 
024514 


024516 
024520 


024522 
024524 


024526 


024534 
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104001 


022703 
001401 


104005 


020412 
001402 


011203 
104001 


020412 
001402 


011203 
104001 


000004 
012700 
013701 
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000360 


177401 
177777 


063313 


000361 


177401 
177777 


000362 
024556 
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USER CONTROLLED BREAKPOINT -- B1T7 SEQ 0141 
3$: ERROR 1 sNEGB DELIVERED WRONG RESULT 
sp eteeererrerrrrrrererereereerretererereKenertineaeeeeeereenerees 
s*TEST 366 NEGB TEST - DM2 - EVEN ADDRESS 
pperteeererererrerrerererecerrerererererererenenereraneeeeeesee eee 
181360: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #360,R0 + LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 DEST ADDR = MBUFO 

MOV #177401, RG sRESULT S$ / B = 177401 

MOV R2,R3 R3 CONTAINS DEST ADDR 

MOV bein cR2) :(DEST) = 177777 

ccc : SCOPE SYNC 
23: NEGB (R3)¢ s TEST THE NEGB 

CMP #MBUFO41,R35 :D1D DEST REG GET INCREMENTED ? 

BEQ 4% sBR IF YES 
3$: ERROR 5 :NEGB FAILED TO UPDATE DEST REG 
4$: CMP RG, (R2) s;CORRECT RESULT ? 

BEQ 181361 > BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 sNEGB DELIVERED WRONG RESULT 
ppeeeeerererrreereeetrreterrtrerterrtrereeeeeeeeeeneneeeeeee eee 
:*TEST 361 NEGB TEST - DM1 - EVEN ADDRESS 
ppeeeeeereereeeeetereererereeeteerertereeeeeeeeKeeeeeReeee Ase Te 
TST361: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #361,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV #177401, R4 sRESULT S$ / B = 177401 

MOV R2,R3 =R3 CONTAINS DEST ADDR 

MOV #-1,(R2) :CDEST] = 177777 

ccc ;SCOPE SYNC 
2s: NEGB (R3) s TEST THE NEGB 

CMP R4,(R2) sCORRECT RESULT ? 

BEQ 1S1362 BR IF YES 

MOV (R2),R3 3;GET THE WAS DATA 
3$: ERROR 1 :NEGB DELIVERED WRONG RESULT 
ppeerererreereererrererrererererereererraneeereereneereeese tes ees 
:*TEST 362 ADD TEST - SMO,DMO - N:C = 1010 
s_terererererreresrerererrerreteeterrereeeeeeneeeeetereeeee Tee ee 
181362: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #362,R0 3;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
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024540 


024554 
024556 
024560 


024570 


024572 
024574 


024576 


024600 


024630 
024632 


024634 
024636 
024640 
024642 


024644 


024646 
024650 


024652 


024654 
024654 
024656 
024662 
024666 
024672 
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000272 
060503 
100403 


103401 
104002 


029403 
001401 


104002 


000004 


000265 
060503 
100003 
001402 
102001 
103001 
104002 


020403 
001401 


104002 
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177777 
000001 


000363 


000007 


000364 


063276 
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1362 ADD TEST = SMO,DMO - N:C = 1010 


CLR R4 4s bye 3 A? / B = 000000 

MOV #=-1,R5 SRC O ve 777 

MOV #+1,R3 OEst « 

ccc > CLEAR rags 

272 oN: = 1010 
28: ADD R5S,R3 ; TEST THE ADD 

BMI 3$ 3N:C = 0101 

BNE 3$ 

Bvs 3% 

BCS 4% 
3$: ERROR 2 :ADD FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 sCORRECT RESULT ? 

BEQ 181363 +3 BR IF YES 
5$: ERROR 2 ;ADD DELIVERED THE WRONG RESULT 
Re ee 

T*TEST 363 ADD TEST = SMO,DMO - N:C = 0101 
REAR AREAERATAAAAAATTATATeETAATeAeAeekeeeeeaekeneeeeeeenaeteees 

11363: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #363,R0 s;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100006, R4 sRESULT S / B&B = 100006 

MOV #77777,R5 :SRC OPR = 77777 

MOV #7,R3 :CDEST) = 

ccc sCLEAR FLAGS 

265 sN:C = 0101 
2$: ADD R5,R3 s TEST THE ADD 

BPL 3$ sN:C = 1010 

BEQ 3$ 

BvCc 3$ 

BCC 4$ 
3$: ERROR 2 ;ADD FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 sCORRECT RESULT ? 

BEQ 181364 BR IF YES 
5$: ERROR 2 ;ADD DELIVERED THE WRONG RESULT 
speeeeeeerrrerereeerrererreeererereeeereratenasaeaeeeeeeeATAe ATES 
s*TEST 364 ADD SM1,0M0 TEST 


p_eeeerrererererererererrerererererererrerereeaeseeeeeeenereneles 


181364: 


SCOPE CALL THE SCOPE LOOP UTILITY 

MOV #364 ,R0 ;;LOAD RO WITH TEST NUMBER 

MOV a#2$,Ri LOAD R1 WITH TEST INSTRUCTION WORD 
MOV WDWTA,RS RESULT S$ / B = #DWTA 

MOV MATA,RS ;SOURCE ADDR = ATA 


SEQ 0142 
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024676 
024700 


024702 


024704 
024706 


024710 


024712 
024716 


024720 


11=SEP=79 


005003 
000257 


061503 


020403 
001401 


104002 


022705 
001401 


104005 


024722 - ° 


024746 
024750 


024752 
024754 


024756 


024760 
024764 


024766 


024770 


025020 
025022 


025024 
025030 


005003 
000257 


062503 


020403 
001401 


104002 


022705 
001401 


104005 


000257 
063503 


020437 
001401 


OGIC 
13: 


STS 


we 
-en 


063276 


000365 


063276 


063300 


000366 


063312 


063312 
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1364 ADD SM1,DM0 TEST SEQ 0143 
CLR R3 :(DESTJ = 0 
ccc ;SCOPE SYNC 
2$: ADD (R5) RS ;TEST THE ADD - SM1,DM0 
CMP R4 RS RESULT = #DWTA? 
BEQ 4$ :BR IF YES 
3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
4$: CMP MATA,RS ;D1D ADD CHANGE REG. 
BEQ 1S1365 :;BR IF NOT 
5$: ERROR 5 ;REG GOT MODIFIED 
pp eteeeeeeerererrrreneertreeeeerereeeeeeneeeaaeeteneeeaAeeeeeTEee 
s*TEST 365 ADD SM2,DM0 TEST 
-e@eeeeeeeereeteeeeeeeeeeerereereeeeeeeeeeeeKeeeeeeeeeretereereteeeet 
181365: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #365,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 Bade -y 8 Pea oe wORD 
MOV ADWTA,R4 sRESULT S / B= 
MOV WATA,RS ; SOURCE ADDR = 2 ATA 
CLR R3 (DEST) = 
ccc :SCOPE SYNC 
2s: ADD (R5)+,R3 TEST THE ADD - SM2,DM0 
CMP R4,R3 ;RESULT = #DWTA 
BEQ 4$ ;BR IF YES 
3$: ERROR 2 :ADD DELIVERED WRONG RESULT 
4$: CMP MATA+2,R5 :D1D ADD AUTO INCREMENT SOURCE REG? 
BEQ 1S1366 ::BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE SOURCE REG. 


pp eeeeerererererereretertrrrtererererinereneeeeeeereeeeeeee eee 


s*TEST 366 ADD SM3,DM0 TEST 


speeeeererreererereserererereneetiaeereeeeNeeee eae eee AT eee 


TS1366: 
, SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #366 ,R0 ;;LOAD RO WITH TEST NUMBER 
MOV _ a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #DWTA,R4 RESULT S / B = #DWTA 
MOV WATA+10,R5 ;R5 POINTS TO SOURCE ADDR 
MOV R4 , a#MBUF O s;CSOURCE] = #DWTA 
CLR R3 ;CDEST] = 0 
ccc SCOPE SYNC 

2$: ADD a(R5)+,R3 ;TEST THE ADD - SM3,DM0 
CMP R4 ,a#MBuF 0 RESULT = #DWTA? 
BEQ 4% ;BR IF YES 
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7687 025032 


688 
7689 025934 
7690 025040 


7692 025042 


066 
7704 025070 
025072 


7708 025074 
7709 025076 


7711 025100 


7713 025102 
7714 025106 


7716 025110 


7729 025142 
7731 025144 


7733 025146 
7734 025152 


7736 025154 


7738 025156 
7739 025162 


7741 025164 
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104002 


022705 
001401 


104005 


020403 
001401 


104002 


022705 
001401 


104005 


065503 


020437 
001401 


104002 


022705 
001401 


104005 


063310 


000367 


063300 


063276 


000370 
025144 
063522 
063310 
065312 


063312 


063306 
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1366 ADD SM35,0M0 TEST SEQ 0144 
3$: ERROR 2 ADD DELIVERED WRONG RESULT 
4%: cmp MATA*12,R5 7D10 ADD AUTO INCREMENT SOURCE REG? 
BEQ 181367 > BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE SOURCE REG. 
s, eeeeerererrerererrerrrerrererereereseererereteneenerereresereeee 
s*TEST 367 ADD SM4,DM0 TEST 
; et eeeerererrerrreererereeeereeeerereeeeteeeeeneeneerenereteeseee 
181367: 
SCOPE ;CALL THE SCOPE LOOP UTILéTY 
MOV #367,R0 >:LOAD RO WITH TEST NUMBER’ 
MOV a#2$,R1 sLOAD R1 4" oy rene WORD 
MOV ADWTA,RS ;RESULT S / B = 
MOV MATA+2,R5S ;SOURCE ADDR = ata” 
CLR R3 = (DEST Jz 
ccc ;SCOPE SYNC 
23: ADD -(R5),R3 s TEST THE ADD - SM4,DM0 
CMP R4,R3 sRESULT = #DWTA? 
BEQ 4% ;BR IF YES 
3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
4$: CMP WATA,RS ;D1D SOURCE REG GET DECREMENTED? 
BEQ 181370 ;7BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE SOURCE REG 
sp eterererrerereerrerererrenerererererenananeseranaeanerereserete 
;*TEST 370 ADD SM5,0M0 TEST 
jp ereeeererererererererererererererereteneanerenenetenereretesete 
181370: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #370,R0 > LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #DWTA,RG sRESULT S / B = #DWTA 
MOV WATA*12,R5 RS POINTS TO SOURCE ADDR 
MOV R4, aeMBUF ;CSOURCE] = #DWTA 
CLR R3 :CDEST] = 0 
CCC SCOPE SYNC 
2s: ADD a-(R5),R3 s TEST THE ADD - SM5,DMO t 
CMP R4 ,a#MBUFO sRESULT = #DWTA? 
BEQ 4$ ;BR IF YES 
3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
4%: CMP MATA*10,R5 ;D1D ADD DECREMENT SOURCE REG? 
BEQ 181371 > BR IF YES 
5$: ERROR 5 sADD FAILED TO UPDATE SOURCE REG. 


LLL EE Eee 


CQKLA-D Rta we?) Se LOGIC TESTS 


CQKDAD .P 


7753 025212 
7755 025214 


7757 025220 
7758 025222 


7760 025224 


7765 025226 


7772 =025254 
7773 ~025256 


7775 025260 


7777 =025264 
7778 025266 


7780 025270 


7785 025272 


7793 025322 


7795 025324 
7797 025326 


79 1 


067503 


020403 
001401 


104002 


061512 
020412 


13:31 


000372 


063312 


000010 


000373 


063276 
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370 ADD SM5,0M0 TEST 


; eeereererererrrererererertereerrereeereteeretereneeeeereeeeteTe 


eTEST 371 ADD SM6,0M0 TEST 


,eeteeerrrrrerrereererererererererererereeeeerentenenereeeeteeTee 


181371: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #371,R0 ;;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #PBUFO,RS RESULT S / B = MBUFO 

MOV WATA,RS ;BASE SOURCE ADDR = ATA 

CLR R3 ;CDEST] = 0 

ccc ;SCOPE SYNC 
23: ADD 10(R5) ,R3 TEST THE ADD - SM6,DMO 

CMP R4,R5 RESULT =MBUFO? 

BEQ 181372 7;BR IF YES 
3$: ERROR 2 ADD DELIVERED WRONG RESULT 
ppeeeeeeeerreeereeererererereeererereeeeeereneeeteeereeeetenerent 
s*TEST 372 ADD SM7,DM0 TEST 


pp erteeerrerererererrerererererererererenenatarenesenererereneeete 


TS1372: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #372,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV ADWTA,RG RESULT S / B = #DWTA 
MOV MATA,RS ;BASE SOURCE ADDR = ATA 
MOV R4 ,a#MBUFO ;CSOURCE] = #DWIA 
CLR R3 (DEST) = 0 
ccc :SCOPE SYNC 
2$: ADD @10(R5),R3 ; TEST THE ADD - SM7,DMO 
CMP R4,R3 ;RESULT = #DWTA? 
BEQ 181373 ;:BR IF YES 
3$: ERROR 2 ;ADD DELIVERED WRONG RESULT 
sl eteeenreerererrererererererenerersereeerkennereeeeeeeereeeAeAese 
s*TEST 373 ADD SM1,DM1 TEST 


sp eterererererererserereeerereererertetreneeeneereetateneeesesesese 


181373: 


SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #373,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #DWTA,RG RESULT S / B = #DWTA 
MOV WATA,RS ; SOURCE ADDR = ATA 
CLR (R2) ;CDEST) = 
ccc SCOPE SYNC 
2s: ADD (R5), (R2) TEST THE ADD - SM1,DM1 
CMP R4,(R2) RESULT = #DWITA? 


SEQ 0145 


COKDA=-D KD11-K BASIC LOG! 


CQKDAD.P11 


025350 
025532 
025334 


025370 


025372 
025374 


025376 
025400 


025402 


025434 
025436 


025440 
025442 


025444 
025450 
025452 


025454 
025460 
025464 


025466 


11-SEP-79 
001402 


0112035 
104001 


020412 
001402 


011203 
104001 


1¢ 
13:31 


000374 


065276 


000375 


063276 


TESTS 
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1375 ADD SM1,0M1 TEST SEQ al 


BEQ 1$1374 ;7BR IF YES 
MOV (R2),R3 GET WAS DATA 
3$: ERROR zADD DELIVERED WRONG RESULT 


; eM eererererrererereerererereerereeeeeeeneeeaeeseneeeTeeeeTelTeee 


s*TEST 574 ADD SM2,0M1 TEST 


53 eeerererrererereerereereerereeeeeeeeeeeeteteeeeeeeeteneeeeeeeee 


151374: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #374,R0 >; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV #DWTA,RS RESULT S / B = #DWIA 

MOV #ATA,RS ;SOURCE ADDR = ATA 

CLR (R2) :CDESTJ = 0 

ccc ; SCOPE SYNC 
23: ADD (R5)4#,(R2) 7 TEST THE ADD - SM2,DM1 

CMP R4,(R2) sRESULT = #DWTA? 

BEQ 181375 ;;BR IF YES 

MOV (R2),R5 ;GET WAS DATA 
3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
ppeeeeeenrereerererererrerererererrreeeeneeeeereetereeeereTeeeeTe 
*TEST 375 ADD SM1,DM2 TES! 


sp eteeeeerrerererererrerererteeereterereneneeneneeeeeeeerAseretes 


181375: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #375,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #DWTA,RG RESULT S / B = #DWTA 
MOV WATA,RS ;SOURCE ADDR = ATA 
MOV R2,R5 ;CR3] = DEST ADDR 
CLR (R2) ;CDEST] = 0 
ccc SCOPE SYNC 
2$: ADD (R5),(R3)¢ TEST THE ADD - SM1,DM2 
CMP R4,(R2) RESULT = #DWTA? 
BEQ 4% ;BR IF YES 
MOV R3,a#MBUF 1 ; SAVE Ae DEST ADDR 
MOV (R2),R3 :GET WAS DAT 
3$: ERROR 1 ; ADD DELIVERED WRONG RESULT 
MOV asMBUF 1 RS RESTORE UPDATED DEST ADDR 
4$: CMP #MBUFO+2,R3 ;D1D ADD INCREMENT DEST REG 
BEQ 181376 3;BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG 


sl eeesceeeerecesserseseecesseseseeseeereseseenerenanessenesasenees 


CQKDA-D KD11-K wet 


CQKDAD.P11 


025470 


025522 
025524 


025526 
025530 


025532 
025536 
025540 
025542 
025546 
025552 


025554 


025556 


025612 
025614 


025616 
025620 


025622 
025626 
025630 


025632 
025636 
025642 


025644 


ate 
Ae 


11-SEP- 


020412 
001406 


010337 
011203 
104001 


013703 
022703 
001401 


104005 


020412 
001406 


063276 


063316 


063316 
063314 


000377 
025614 
063312 
063322 
063276 
063306 
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1376 ADD SM2,DM2 TEST 


s*TEST 376 ADD SM2,0M2 TEST 


,peeteereererererererererrerereerereererereerereneeeeeTeneeeTeTeTe 


181376: 


SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #376,R0 7;LOAD RO WITH TEST NUMBEP 
MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ay = MBUFO 
MOV #DWTA,RG ;RESULT S / B = #DWTA 
MOV MATA,RS ;SOURCE ADDR = ATA 
MOV R2,R :(R3) = DEST ADDR 
CLR (R2) :CDEST] = 0 
ccc ; SCOPE SYNC 
2%: ADD (R5)4#,(R3)¢ ;TEST THE ADD = SM2,DM2 
CMP RG, (R2) RESULT = #DWTA 
BEQ 4% ;BR IF YES 
MOV R3,ae¢MBUF 1 ;SAVE UPDATED DEST ADDR 
MOV (R2),R3 ;GET WAS DATA 
3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
MOV aeMBuUF 1 ,R3 RESTORE UPDATED DEST ADDR 
4$: CMP #MBUFO+2,R3 ;D1D ADD INCREMENT DEST REG? 
BEQ 181377 ;;BR IF YES 
5$: ERROR 5 ADD FAILED TO UPDATE DEST REG 


ppeeerereerreerererereererrererrertesereneHeeHenanenarerereseTees 


:eTEST 377 ADD SM1,DM3 TEST 


2 eeeeeateeererererererereerererereerrererereeerererertrereresere 


1$1377: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #377,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUF 0 ,R2 ;DEST ADDR = MBUFO 
MOV MDWTA,RG RESULT S / B = #DWTA 
MOV WATA,RS + SOURCE ADDR = ATA 
MOV WATA+10,R3 ;CR3] = ADDR OF DEST ADDR 
CLR (R2) :CDESTI = 0 
ccc SCOPE SYNC 
2$: ADD (R5),a(R3)+ :TEST THE ADD - SM1,DM3 
CMP R4,(R2) sRESULT = #DWTA? 
BEQ 4$ ;BR IF YES 
MOV R3,a#MBUF 1 sSAVE R3 
MOV (Re), :GE1 WAS DATA 
3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
MOV aeMBuF 1 ,R3 ;RESTORE R35 
4$: CMP WATA+12,R3 ;D1D ADD INCREMENT DEST REG 
BEQ 181400 ;;BR IF YES 
5$: ERROR 5 ADD FAILED TO UPDATE DEST REG 


SEQ 0147 


CQOKDA-D «D11-« Tesede 


CQKDAD.P11 


025646 


025702 
025704 


025706 
025710 


025712 
025716 
025720 
025722 
025726 
025732 


025734 


025736 


025772 
025774 


025776 
026000 


926002 
026006 
026010 


026012 
026016 
026020 


0625355 


020412 
001406 


010337 
011203 
104001 


013703 
022703 
001401 


104005 


000257 
0615435 


020412 
001406 


010337 
011203 
104001 


013703 
020302 
001401 


000400 


063306 


000401 


063314 


063316 


063316 
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1377 


ADD SM1,0"35 TEST 


3 ;eeereerereerererererereeeeerereeeereeeeeeereeereneneeeeeeeTetTe 


*TEST 400 


, eeeererrerererrrererererrererereererereeareeeseeerensenereeTeee 


11400: 


2%: 


3$: 


4$: 


5$: 


ERROR 


ADD SM2,0M3 TEST 


MATA+10,R3 
(RZ) 


(R5)+,a(R5)¢ 


R4,(R2) 
4% 


R3,aeMBUF 1 
188),.82 


asMBUF1,R3 
MATA+12,R3 
781401 


5 


;CALL THE SCOPE LOOP UTILITY 

3;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

sRESULT S / B = #DWTA 

: SOURCE ADDR = ATA 

;(€R3] = ADDR OF DEST ADDR 

; (DEST) = 

;SCOPE SYNC 


TEST THE ADD = SM2,DM2 


sRESULT = #DWTA? 
;BR IF YES 


SAVE R3 
;GET WAS DATA 
;ADD DELIVERED WRONG RESULT 


SRESTORE R3 
;D1D ADD INCREMENT DEST REG 
;;BR IF YES 


;ADD FAILED TO UPDATE DEST REG 


° set etareerererererrereeteererenereteneseneeesesetetereneeenenenee 


:*TEST 401 


*“s@@neeeeeererteetrrreereeteteteteeeeteeteteeteteeeeeeeeeeeteteetetese 


1$1401: 


2s: 


3$: 


4%: 


ADD SM1,0M4 TEST 


#MBUFO,R2 
MDWTA,RS 
MATA,RS 
#MBUFO+2,R3 
(R2) 


(R5),-(R3) 
RG,(R2) 

4% 
R3,a¢MBUF 1 
(R2),K3 

1 
aeMBuF 1 RS 


R3,R2 
T$1402 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

; RESULT S / B = #DWTA 

;SOURCE ADDR = ATA 

:R3 POINTS TO DEST ADDR +2 

:CDESTJ = 0 

SCOPE SYNC 


TEST THE ADD - SM1,DM4 


RESULT = #DWIA? 
BR IF YES 


SAVE R3 
3GET WAS DATA 
;ADD DELIVERED WRONG RESULT 


SRESTORE R3 


:DID ADD INCREMENT DEST REG? 
7:BR IF YES 


"a 


SEQ 0148 | 







CQKDAD.P11 


7966 
7967 026022 


7972 026024 


7983 026062 
7985 026064 
86 026066 


7988 026070 
7989 026074 
7990 026076 


7992 026160 
7993 026104 
7994 026106 


7996 026110 


8001 026112 
8002 026112 
8003 026114 
8004 026120 
8005 026124 
8006 026130 
8007 026134 
8008 026140 
8009 026144 
8010 026146 


80'2 026150 


8014 026152 
8015 026154 


8017 026156 
8018 026162 
8019 026164 


026166 


CQKDA-D KD11-K BASIC 
11-SEP- 





104005 


020412 
001406 


010337 
011203 
104001 


013703 
020302 
001401 


104005 


020412 
001406 


010337 
011203 
104001 


013703 






























000402 


065314 


063316 


063316 


000403 


063310 


065316 


063516 
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— SOA(1052) 11-SEP-79 15:52 PAGE 150 


01 ADD SM1,0M4 TEST 


5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG. 


s*TEST 402 ADD SM2,D0M% TEST 


;, eeereeverererrrerreerererecereserereerrerererteneeteneeereeeeeTee 


T$1402: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #402,R0 ait OAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, Ro ;DEST ADDR = MBUFO 
MOV aDWTA, RG sRESULT S / B = #DWTA 
MOV #ATA,RS = SOURCE ADDR = ATA 
MOV #MBUFO+2,R3 sR3 POINTS TO DEST ADDR +2 
CLR (R2) sCDESTJ = 0 
ccc ;SCOPE SYNC 
2$: ADD (R5),-(R3) ;TEST THE ADD - SM2,DM4 
CMP R4,(R2) sRESULT = #DWIA? 
BEQ 4% ;BR IF YES 
MOV R3,aeMBUF 1 sSAVE R3 
MOV (R2),R3. :GET WAS DATA 
3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
MOV aaMBuF1,R3 sRESTORE R3 
4$: CMP R3,R2 ;D1D ADD INCREMENT DEST REG? 
BEQ 181403 >: BR IF YES 
5$: ERROR 5 :ADD FAILED TO UPDATE DEST REG. 


,p,eeerereerereerrerererrereseeeererererenaneeeeeneeeeeeeenesenere 


SeTEST 403 ADD SM1,0M5 TEST 


so eteraeerererererrerereeneerrerererereraneneneseresenerenenatere 


1$1403: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #403,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 sDEST ADDR = MBUFO 
MOV #DWIA,RS sRESULT S / B = #DWTA 
MOV #ATA,RS ;SOURCE ADDR = ATA 
MOV MATA*12,R3 sR3 CONTAINS ADDR OF DEST ADDR PLUS 2 
CLR (R2) :COEST] = 0 
CCC ;SCOPE SYNC 
2$: ADD (R5),a-(R3) sTEST THE ADD - SM1,DM5 
CMP R4,(R2) sRESULT = #DWTA? 
BEQ 4% ;BR IF YES 
MOV R3,a08 — SAVE R3 
MOV (R2),R3 ;GET WAS DATA 
3$: ERROR 1 sADD DELIVERED WRONG RESULT 
MOV aeMBuF 1, RS sRESTORE R3 


—_ 
! 


SEQ 0149 | 


CQKDA-D KDI1-K BASIC LOGIC TESTS 


COKDAD.P11 


026172 
026176 


026200 


026202 


026236 
026240 


026242 
026244 


026246 
026252 
026254 
026256 
026262 
026266 


026270 


026272 
026272 


026526 
026330 


026334 
026336 


026340 
026342 


11-SEP-79 13:31 


022703 
001401 


104005 


000257 
062553 


020412 
001406 


010337 
011203 
104001 


013703 
022703 
001401 


104005 


020412 
001402 


011203 
104001 





063306 


000404 
026240 
063312 
063322 
063276 
063310 


063316 


063316 
063306 


000405 


063276 
063312 


000004 


H 12 
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1403 ADD SM1,0M5 TEST SEQ 0150 
4%: CMP MATA*10,R3 7D1D ADD DECREMENT DEST REG? 

BEQ TS1404 >: BR If YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG. 
PL erteeeereererrrererrerererereererrerereneneestererenetereterete 
s*TEST 404 ADD SM2,0M5 TEST 
p,eteeeeteererrererererrerererererererteneneneerentenetereeererenee 
TS1404: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #404,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV ADWTA,RS sRESULT S / B = #DWTA 

MOV MATA,RS ;SOURCE ADDR = ATA 

MOV MATA*12,R3 sR3 CONTAINS ADDR OF DEST ADDR PLUS 2 

CLR (R2) ;(OESTJ = 0 

CCC : SCOPE SYNC 
23: ADD (R5)+,a-(R3) ;TEST THE ADD - SM2,DM5 

CMP R4,(R2) sRESULT = #DWTA? 

BEQ 4% :BR IF YES 

MOV R3,a*MBUF 1 SAVE R3 

MOV (R2),R3 ;GET WAS DATA 
3$ ERROR 1 ;ADD DELIVERED WRONG RESULT 

MOV aeMBUF1,R3 sRESTORE R3 
4%: CMP MATA+10,R3 3;D1D ADD DECREMENT DEST REG? 

BEQ T$1405 3;BR IF YES 
5$: ERROR 5 ;ADD FAILED TO UPDATE DEST REG 
sie eeneeerrerseererereererrerereseeneeeaenenaseeeaesaneeeesereetes 
:*TEST 405 ADD SM1,0M6 TEST 
,, eeeeererererereererereeeeeresererensesenaeeseneteeseeeeeAneeeee 
1$1405: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #405,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO+4, R2 :DEST ADDR = MBUFO+4 

MOV ADWIA,RS sRESULT S / B = #DWTA 

MOV WATA,RS + SOURCE ADDR = ATA 

MOV #MBUFO,RS :0R3] = BASE DEST ADDR 

CLR (R2) : (DEST) = 0 

CCC : SCOPE SYNC 
23: ADD (R5),4(R3) sTEST THE ADD - SM1,DM6 

CMP R4,(R2) sRESULT = @DWITA? 

BEQ 181406 ;;BR IF YES 

MOV (R2),R3 :GET WAS DATA 
3$: ERROR ] sADD DELIVERED WRONG RESULT 
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CL ESTS MACY11 50A(1052) 11-SEP-79 
11-SEP=7 1 


CQKDAD. 1406 ADD SM2,0M6 TEST SEQ 0151 
8078 pp teeeeerrerrercererererrrerererererrerereetenetereeeeeeeTeeTeees 
8079 s*TEST 406 ADD SM2,0M6 TEST 
8080 pp eteerrerererererererereererereereerrerereteeetentenerteereretee 
8081 026344 1TS$1406: 

8082 026344 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
3 026346 012700 000406 MOV #406,R0 7;LOAD RO WITH TEST NUMBER 
8084 026352 013701 026402 MOV 2a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8085 026356 012702 063316 MOV #MBUFO+4,R2 ;DEST ADDR = MBUFO+4 
8086 026362 0127046 063322 MOV ADWTA,RG ;RESULT S / B = #DWTA 
8087 026366 012705 063276 MOV MATA,RS ;SOURCE ADDR = ATA 
8088 026372 012703 063312 MOV #MBUFO,R3 7CR3] = BASE DEST ADDR 
8089 026376 005012 CLR (R2) ;CDEST] = 9 
ote, 026400 000257 ccc ; SCOPE SYNC 
poae 4 026402 062563 000004 23: ADD (R5)4*,4(R3) sTEST THE ADD = SM2,DM6 
8094 026406 020412 CMP R4,(R2) sRESULT = #DWTA? 
oad 026410 001402 BEQ 181407 77;BR IF YES 
8097 026412 011203 MOV (R2),R3 ;GET WAS DATA 
ote 026414 104001 3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
8100 ppteeeeeeerererrrerereererenereerereretereeeeerenererereeeterees 
8101 s*TEST 407 ADD SM1,0M7 TEST 
8102 ppteeeererrerererrerrererereeeereereeeeereeeeeeeRee eRe EET ee 
8103 026416 181407: 
8104 026416 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
8105 026420 012700 000407 MOV #407,R0 3;LOAD RO WITH TEST NUMBER 
8106 026424 013701 026452 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8107 026430 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
8108 026434 012704 063322 MOV M#DWIA,RS sRESULT S / B = #DWTA 
8109 026440 012705 063276 MOV MATA,RS ;SOURCE ADDR = ATA 
8110 026444 010503 MOV R5,R35 ;BASE DEST ADDR = ATA 
8111 026446 005012 CLR (R2) :CDEST] = 0 
He 026450 000257 ccc ; SCOPE SYNC 
thy 026452 061573 000010 2s: ADD (R5),a10(R3) ;TEST THE ADD - SM1,DM7 
8116 026456 020412 CMP R4,(R2) sRESULT = #DWTA? 
Bia 026460 001402 BEQ 1S1410 7:;BR IF YES 
8119 026462 011205 MOV (R2),R3 ;GET WAS DATA 
ast 026464 104001 3$: ERROR 1 :ADD DELIVERED WRONG RESULT 
as) pe eeeeeerenreeeneeereererereerereeneeeeeeeeeee tener Ee EEE AEE 
8123 ;*TEST 410 ADD SM2,0M7 TEST 
8124 pp ee eeeeereneeererrerererereeeeee tree teteee Reet eee e AEE eA 
8125 026466 181410: 
8126 026466 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
8127 026470 012700 000410 MOV #410,R0 3;LOAD RO WITH TEST NUMBER 
8128 026474 013701 026522 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8129 026500 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
8130 026504 012704 063322 MOV MDWTA,RS sRESULT S / B = #MDWTA 
8131 026510 012705 063276 MOV #ATA,RS ;SOURCE ADDR = ATA 
8132 026514 010503 MOV R5,R5 BASE DEST ADDR = ATA 
813% 026516 005012 CLR (R2) ;LDEST] = 0 


J 12 
13 


CQKDA-D KDI1-« was it LOGIC TESTS MACY11 30A(1052) 11-SEP-79 75% PAGE 153 

CQKDAD.P11 11-SEP-79 13:31 1410 ADD SM2,D0M7 TEST SEQ 0152 
His 026520 000257 ccc ;SCOPE SYNC 
Hf 026522 062573 000010 2%: ADD (R5)4+,a10(R3) : TEST THE ADD = SM2,0M7 
8138 026526 020412 CMP RG, (R2) sRESULT = #DWTA? 
HA 026530 001402 BEQ TS1411 3;BR IF YES 
8141 026532 011203 MOV (R2),R3 7GET WAS DATA 
+ 026534 104001 3$: ERROR 1 ;ADD DELIVERED WRONG RESULT 
8144 sp etererereererererrererererererererteteretenarerenerenetereneneeee 
8145 s*TEST 411 "OR RA,RB’' TEST - A=B=000000 N:C='010 
8146 spe eeeererrererrerreercereerrererenereneneeKeereeraeeneneeeereeee 
8147 026536 TST411: 
8148 026536 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
8149 026540 012700 000411 MOV #411,R0 > LOAD RO WITH TEST NUMBER 
8150 026544 013701 026560 MOV a#2$,R1 sLGOAD R1 WITH TEST INSTRUCTION WORD 
8151 026550 005004 CLR R4 sRESULT AND MASK = 000000 
8152 026552 005003 CLR R3 ;CDESTJ] = 000000 
8153 026554 000257 ccc ;SCOPE SYNC 
He 026556 000272 272 MAKE N:C=1010 
Bias 026560 074403 2$: XOR R4,R3 : TEST THE XOR 
8158 026562 100403 BMI 3$ :N:C=0100 ?? 
8159 026564 001002 BNE 3$ 
8160 026566 102401 BVS 3$ 
+e 026570 103001 BCC 4$ 
coe 026572 104002 3$: ERROR 2 :MOR FAILED TO SET FLAGS PROPERLY 
8165 026574 020403 4$: CMP R4,R3° sRESULT CORRECT? 
the 026576 001401 BEQ TS1412 3:BR IF YES 
te 3 026600 104002 5$: ERROR 2 :XOR DELIVERED THE WRONG RESULT 
a190 sp eeeeeereerererererereeressererreteereneeeneeeeeeeseeeA AeA eS 
8171 s*TEST 412 "YOR RA,RB’’ TEST = A=B=177777 N:C=0101 
8172 speteerereerrerereresererererresenereeaeeAeneeeeeeAeNeAeetAseeees 
8173 026602 TST412: 
8174 026602 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
8175 026604 012700 000412 MOV #412,R0 +;LGAD RO WITH TEST NUMBER 
8176 026610 013701 026630 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
8177 026614 005004 CLR R4 sRESULT = 000000 
8178 026616 012705 177777 MOV #-1,R5 sMASK = 177777 
8179 026622 010503 MOV R5,R3 sCDESTJ=177777 
8180 026624 000257 ccc ;SCOPE SYNC 
+H 026626 000265 265 : MAKE N:C=0101 
aie: 026630 074503 2$: XOR R5,R3 s TEST THE XOR 

4 

8185 026632 100403 BM] 3$ :N:C=0101 ?? 
8186 026634 001002 BNE 3$ 
8187 026636 102401 BvS 3$ 
He 026640 1034051 BCS 4$ 





—| 
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026644 
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026650 


026652 


026702 
026704 
026706 
026710 
026712 
026714 
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026722 
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026726 


026754 
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026760 


026762 
026764 
026766 
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001401 


104002 


000004 


000266 
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100003 
001402 
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103001 
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020403 
001401 
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125252 
052525 


000414 
026760 
177777 
052525 
125252 
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3$: 
4$: 


5$: 


ERROR 


CMP 
BEQ 


ERROR 


K 
11-SEP-79 
“KOR RA,RB™ TEST - A 


2 


R4,R3 
T$1413 


2 


12 
13; 
=B: 


53_ PAGE 154 
iT N:C=0101 


MOR FAILED TO SET FLAGS PROPERLY 
+ RESULT CORRECT? 
IF YES 


MOR DELIVERED THE WRONG RESULT 


ppeeeeerrrrererrerrerereerrereneeeetertereneneeeeeeeeneneeeeeTeee 


s*TEST 413 


181413: 


2$: 


3$: 
4%: 


5$: 


ERROR 


"MOR RA,RB’ TEST = A=125252,8=052525 N:C=0110 


ppetteeereeereerererereererenertereerereeeeeneenerenenenereLeneeee 


#413,R0 
a#2$,R1 
#-1,R4 
#125252,R5 
#052525,R3 


2 


R4,R3 
TST414 


2 


CALL THE SCOPE LOOP UTILITY 

7;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;RESULT $/B = 177777 


; SCOPE SYNC 
sMAKE N:C=0110 
s TEST THE XOR 
3N:C=1060 ?? 


7MOR FAILED TO SET FLAGS PROPERLY 


RESULT CORRECT? 
;;BR IF YES 


:XOR DELIVERED THE WRONG RESULT 


"eee eeeeeeeteteteteteeereereeeeereeeteeraeeeneteneeteeeeeeeneeeee 


“MOR RA,RB’ TEST = A=052525,B=125252 N:C=1001 


TEST 414 


POT rerereT TTT TTT eTTrrrrerrrerrTrT Tr TeTrTITITiITITITITITITiT Tt) LL 


1S1414: 


2$: 


3$: 


#414,R0 
oer. “ 
#-1, 
152595, R5 
#125252,R3 


;CALL THE SCOPE LOOP UTILITY 

:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;RESULT S$/B = 177777 


MAKE N:C=1001 


s TEST THE XOR 
3N:C=1001 ?? 


MOR FAILED TO SET FLAGS PROPERLY 





SEQ 0153 | 


L 12 
CQKDA-D KD11-K BASIC LOG! 1€ TESTS MACY11 S50A(1052)_ 11-SEP-79 13:53 PAGE 155 
CQKDAD.P11 11-SEP-79 13:31 1414 “CR RA,RB’ TEST = A=052525,B= 155282 N:C=1001 SEQ 0154 
8246 0267/4 620405 4$: CMP R4,R3 RESULT CORRECT? 
ace 026776 001401 BEQ TST415 :;BR IF YES 
asep 027000 104002 5$: ERROR 2 :MOR DELIVERED THE WRONG RESULT 
8251 haat Aelita d decides 
8252 s*TEST 415 "MOR RA,(RB)"’ TEST = A=B=000000 N:C=1010 
8253 perenerereeerererrerererererentereeeeereneteeeeeeeeteeeeetenenes 
8254 027002 181415: 
8255 027002 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8256 027904 012700 000415 MOV #415,R0 ;;LOAD RO WITH TEST NUMBER 
8257 027010 013701 027032 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8258 027014 005004 CLR RG ;RESULT S$ / B = 000000 
8259 027016 005005 CLR R5 sMASK = 000000 
8260 027020 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
8261 027024 005012 CLR (R2) :CDESTJ = 000000 
8262 027026 000257 ccc ;SCOPE SYNC 
Bser 027030 000272 272 :MAKE N:C=1010 
Bree 027032 074512 2$: XOR R5,(R2) ;TEST THE XOR 
8267 027034 100403 BMI 3$ :N:C = 0100 ?? 
8268 027036 001002 BNE 3$ 
8269 027040 102401 BvS 3$ 
ast 027042 103001 BCC 4$ 
344 027044 104001 3$: ERROR 1 ;MOR FAILED TO ALTER CODES PROPERLY 
8274 027046 020412 4$: CMP R4,(R2) ;RESULT CORRECT? 
ashe 027050 001402 BEQ TST416 3:BR IF YES 
8277 027052 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
ths 027054 104001 5$: ERROR 1 :XOR DELIVERED THE WRONG RESULT 
e500 ppeteeeeeeeeereteeeeretererereteeeeeteereeeeKee eee TERA Te eee Nees 
8281 s*TEST 416 “XOR RA,(RB)' TEST = A=B=177777 N:C=0101 
8282 ppeeeeeeeterereeeerereeererereKe etree ee eee eee eee RAR eee 
8283 027056 TST416: 
8284 027056 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8285 027060 012700 000416 MOV #416,R0 ;;LOAD RO WITH TEST NUMBER 
82 027064 013701 027112 MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
8287 027070 005004 CLR R4 ;RESULT § / B = 000000 
82 027072 012705 177777 MOV #-1,R5 sMASK = 177777 
8289 027076 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
8290 027102 012712 177777 MOV #-1,(R2) ;CDEST) = 177777 
8291 027106 000257 ccc :SCOPE SYNC 
asot 027110 000265 265 ;MAKE N:C=0101 
aoe 027112 074512 2$: XOR R5,(R2) ; TEST THE XOR 
8296 027114 100403 BM1 3$ sN:C = 0101 2? 
8297 027116 001002 BNE 3$ 
8298 027120 102401 BvS 3$ 
he 027122 103401 BCS 4$ 


8301 027124 104001 3$: ERROR 1 MOR FAILED TO ALTER CODES PROPERLY 


M12 
CQKDA-D KDI1-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 156 
CQKDAD.P11 11-SEP-79 13:31 1416 “MOR RA,(RB)" TEST = A=B=177777 N:C=0101 SEQ 0155 
8302 
8303 027126 020412 4$: CMP R4,(R2) ;RESULT CORRECT? 
tte 027130 001402 BEQ TS1417 BR IF YES 
8306 027132 011203 MOV (R2),R3 ;GET THE WAS DATA 
tod 027134 104001 5$: ERROR 1 MOR VELIVERED THE WRONG RESULT 
8309 ppeeteeenereerrererrereretererereterertereraeaeeeereeeaeereeeeee ee 
8310 s*TEST 417 "MOR RA,(RB)"’ TEST = A=125252,8=052525 N:C=0110 
8311 ppeteeerererreerreerreeereresetesetereteeneeeeeeeeKeeeeeeeAee ETS 
8312 027136 1ST417: 
83135 027136 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8314 027140 012700 000417 MOV #417,R0 >;LOAD RO WITH TEST NUMBER 
8315 027144 013701 027206 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8316 .SBTTL USER CONTROLLED BREAKPOINT -- BITS 
8317 027150 032737 000400 063234 BIT e+ hie a#BPTLOC ae oe HALT SET ?? 
8318 027156 001401 BEQ . ;BR IF N 
8319 027160 000000 HALT :BREAK = DEPRESS CONTINUE TO RESTART 
8320 027162 012704 177777 MOV #-1,R4 ;RESULT $/B = 177777 
8321 027166 012705 125252 MOV #125252.,R5 sMASK = 125252 
8322 027172 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
8323 027176 012712 052525 MOV #052525, (R2) ;COEST] = 052525 
8324 027202 000257 ccc 7SCOPE SYNC 
tt 027204 000266 266 :MAKE N:C=0110 
atSe 027206 074512 2$: XOR R5,(R2) TEST THE XOR 
8329 027210 100003 BPL 3$ 3N:C = 1000 ?? 
8330 027212 001402 BEQ 3$ 
8331 027214 102401 BvS 3$ 
Ht 027216 103001 BCC 4% 
ate 027220 104001 3$: ERROR 1 MOR FAILED TO ALTER CODES PROPERLY 
8336 027222 020412 4$: CMP R4,(R2) RESULT CORRECT? 
the 027224 001402 BEQ TS1420 ;:BR IF YES 
8339 027226 011203 MOV (R2) ,R3 GET THE WAS DATA 
te 027230 104001 5$: ERROR 1 :XOR DELIVERED THE WRONG RESULT 
tne: sleeereeeererererererrerererrereresteeeerAeeeeeeAeeseAseAeereeee 
8345 :*TEST 420 "MOR RA,(RB)'' TEST - A=052525,B=125252 N:C=1001 
8344 sp eeerererrerereereerererreerererrerereneeeeeeeesereneeeeeAAeT eee 
8345 027232 TS1T420: 
8346 027232 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8347 027234 012700 000420 MOV #420,R0 ;;LOAD RO WITH TEST NUMBER 
8348 027240 013701 027270 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8349 027244 012704 177777 MOV #-1,R4 ;RESULT $/B = 177777 
8350 027250 012705 052525 MOV #52525,R5 sMASK = 052525 
8351 027254 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
8352 027260 012712 125252 MOV #125252, (R2) ;CDEST] = 125252 
8353 027264 000257 ccc SCOPE SYNC 
ite 027266 000271 271 MAKE N:C=1001 
it 027270 074512 2$: XOR R5,(R2) TEST THE KOR 
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N12 
oe SOA(1052) 11-SEP-79 13:53 PAGE 157 
1420 "MOR RA,(RB)" TEST = A=052525,B= 138352 N:C=1001 


BPL 3$ sN:C = 1001 ?? 

BEQ 3% 

BvS 3$ 

BCS 4% 
3$: ERROR 1 :MOR FAILED TO ALTER CODES PROPERLY 
4$: CMP RG, (R2) ;RESULT CORRECT? 

BEQ T$1421 7:BR IF YES 

MOV (R2),R3 3GET THE WAS DATA 
5$: ERROR 1 :XOR DELIVERED THE WRONG RESULT 
pp etreeeerrerererreeererteeeereeeeeereerAeeReReeeeKAeKeAeeATeAATe 
s*TEST 421 SUB TEST SMO,DMO - (SRC) = (DEST) = +,+ 


ppeeeereeerreerreerrenererererrerereeteeeKaeeeaeeRereeneRaeeeeee 


TST421: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #421,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 RESULT S / B = 0 
MOV #052525,R3 :CR3) = DEST OP = 52525 
MOV R3,R5 3CR5] = SRC OP = 52525 
ccc ;CLEAR FLAGS 
273 MAKE N:C = 1011 
2$: SUB R5,R3 : TEST THE SUB 
BMI 3$ 
BNE 3$ ;D1D N:C = 0100 
BVS 3$ 
BCC 4$ 
3$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 sWAS RESULT = 0? 
BEQ TST422 ;:BR IF YES 
5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 


ppeeeeeeeeererererererterertrttererrrereeeee eee AeA EAA AAAS 


s*TEST 422 SUB TEST SMO,DMO - (SRC) = (DEST) = -,- 


pp eeeeererererererereerrrrrererrreetereeeeeeeee re eee eee eee Tee 


TS1T422: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #422,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD RI ww TEST INSTRUCTION WORD 
CLR R4 :RESULT S / B = 0 
MOV #125252,R3 :CR3] = DEST OP = 125252 
MOV R3,R5 :CR5] = SOURCE OP = 125252 
ccc CLEAR FLAGS 
273 MAKE N:C = 1011 
2$: SUB R5,R3 TEST THE SUB 
BM] 3$ 


SEQ 0156 
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146 027416 
027420 
$ 027422 
: 027424 
0 027426 

1 0274350 
8422 


8425 027432 


8435 027462 
8436 027464 


8438 027466 
8440 027470 
8441 027472 
8442 027474 
8443 027476 
8445 027500 


8447 027502 
8448 027504 


8450 027506 


8463 027540 
8465 027542 
8467 027544 


8468 027546 
8469 027550 
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001002 
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001401 


104002 
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001402 
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001401 


104902 
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001402 
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000423 


177777 


000424 


ne) A mee eet 11-SEP-79 P 753 PAGE 158 
1422 suB | 


T SMO,DMO = (SRC) = (DEST) = -,- SEQ 0157 
BNE 3% 3N:C = 0100? 
Bvs 3% 
BCC 4% 
3$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 
4%: CMP R3,R4 sRESULT = 0? 
BEQ 1$1423 7:;BR IF YES 
5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
pp eeeererererrerererererrerererereeereerenenenenteeeneeeereneeeere 
s*TEST 423 SUB TEST SMO,DMO - (SRC) = (DEST) = -,+ 
sp, eeeetererverrrereererererereerererererereraaseneneteneeatereretese 
181423: 
SCOPE 7CALL THE SCOPE LOOP UTILITY 
MOV #423,R0 >; LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 7LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #2,R4 sRESULT S / B = 2 
MOV #1,R3 7(R3) = DEST OP = 1 
MOV #-1,R5 7CR5] = SRC OP = -1 
ccc ;CLEAR FLAGS 
276 sMAKE N:C = 1110 
2%: SUB R5,R3 sTEST THE SUB 
BMI 3$ 
BEQ 3$ 3N:C = 0001 
Bvs 3$ 
BCS 4% 
3$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R3,R4 sRESULT = 42? 
BEQ TS1424 3:BR IF YES 
5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
sit eererererererrreeereerrsereerererereeensaeaaeneeeReReAeeTEne 
s*TEST 424 SUB TEST SMO,DMO (SRC) = -(DEST) = ¢+,- 
sp eeerererererereeresereserereeresetetseaeeeeeeeANeAseeeeeTAEeTS 
TS1424: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #424,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #-2,R4 RESULT § 4/64 “ 
MCV #-1,R3 3CR3) = CDESTJ = -1 
MOV #1,R5 ;CR5) = CSOURCE] = 
CCC sCLEAR FLAGS 
267 sMAKE N:C = 0111 
2$: SUB R5,R3 : TEST THE SUB 
BPL 3$ 
BEQ 3% =N:C = 1000 
Bvs 3$ 


C13 Pints 
TESTS MACYIT SOACIO52) I1=SEP-79_ 15:53 PAGE 159 
SEQ 0158 


CQKDA-D KDI1-K BASIC Los! 1¢ 

CQKDAD.P11 11-SEP-79 13:31 1424 TEST SMO,DMO (SRC) = -(DEST) = +,- 
ety 027552 103001 BCC 4$ 
Hi} 027554 104002 3$: ERROR 2 ;SUB DID NOT ALTER CODES PROPERLY 
8474 027556 0620405 4$: CMP R4,R3 ;RESULT = <2? 
arte 027560 001401 BEQ TS1425 ;;BR IF YES 
ore 027562 104002 5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
8479 ppeeeeeereereereeeerereerrereeerererereneerereneeererererereTeTe 
8480 s*TEST 425 SUB TEST SMO,DM0 - ‘'v’’ BIT SETS 
8481 pLeteeeerereererererererereereeerereereeererereeeeeerenenTereeeTe 
8482 027564 TS1425: 
8483 027564 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
8484 027566 012700 000425 MOV #425 ,R0 :;LOAD RO WITH TEST NUMBER 
8485 027572 013701 027616 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8486 027576 012704 077777 MOV #77777,R4 RESULT = 77777 
8487 027602 012703 100000 MOV #100000 ,R3 ;CR3) = DEST os * darren 
8488 027606 012705 000001 MOV #1,R5 :(R5] = SRC OP 
8489 027612 000257 ccc CLEAR FLAGS 
eat 027614 000274 274 :MAKE N:C = 1100 
rs} 027616 160503 2$: SUB RS,R3 TEST THE SUB 
8494 027620 100403 BM! 3$ 
8495 027622 001402 BEQ 3$ 3N:C = 0011 (’'V" BIT SHOULD SET) 
8496 027624 102001 BvCc 3$ 
opt 027626 103001 BCC 4$ 
+444 027630 104002 3$: ERROR 2 ;SUB FAILED TO ALTER CODES PROPERLY 
8501 027632 020504 4$: CMP R3,R4 RESULT = 77777? 
4) 027634 001401 BEQ T$1426 ;;BR IF YES 
392) 027636 104002 5$: ERROR 2 ;SUB DELIVERED WRONG RESULT 
8506 js So eoesSoseTEnoSerecooseronseconsessotoononosaenaaToesoseeses 
8507 :*TEST 426 SUB TEST - SMO,DM1 = N:C = 0110 


8508 sp eereeeerrererererrererereresenerrereseeteereeseeenesaeeAeeeteee 


8509 027640 TS1426: 


8510 027640 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8511 027642 012700 000426 MOV #426,R0 ;;LOAD RO WITH TEST NUMBER 
8512 027646 013701 027674 MOV a#2$,R! ;LOAD R1 WITH TEST INSTRUCTION WORD 
8513 027652 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

8514 027656 012704 177777 MOV #-1,R4 oar tee S$ / B = 177777 

8515 027662 012705 000001 MOV #+1,R5 = +] 

8516 027666 005012 CLR (R2) PDESTO. = 000000 

8517 027670 000257 ccc ot ge FLAGS 

a9 027672 000266 266 NC = 0110 

aast 027674 160512 2$: SUB R5,(R2) ; TEST THE SUB 

8522 027676 100003 BPL 3$ :N:C = 1001 


8523 027700 001402 BEQ 3$ 
8524 027702 102401 BvS 3$ 
8525 027704 103401 BCS 4$ 


COKDA-D KDI1-« we 
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027706 


027710 
027712 


027714 
027716 


027720 


027752 
027754 
027756 
027760 
027762 
027764 
027766 


027770 
027772 


027774 
027776 


030000 


030052 
030034 
030036 


030040 
030042 


104001 


020412 
001402 


011203 
104001 


000004 


000272 
160512 
100403 
001002 
102401 
103001 
104001 


020412 
001402 


011203 
104001 


000427 
027754 
063312 


177777 
177777 


000430 
030034 
063312 
077777 
000001 
100000 


D 13 
A ee est 11-SEP-79 15:53 PAGE 160 
1426 SUB TEST = SMO,DM1 - N:C = 0110 


3$: ERROR 1 ;SUB FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,(R2) ;CORRECT RESUL? ? 

BEQ 1$1427 ::BR IF YES 

MOV (R2),R3 :GET THE WAS DATA 
5$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 
peeeeeerererreeerereerereereereeerererenereenetereneterererereTe 
*TEST 427 SUB TEST = SMO,DM1 - N:C = 1010 


eter erereerererererereerererereereeerereeerereeeresaeeretereTes 


TS1427: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #427,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
CLR RG ;RESULT S / B = 000000 
MOV #-1,R5 SRC OPR = 177777 
MOV #-1,(R2) :CDEST) = 177777 
ccc 7 CLEAR FLAGS 
272 3N:C = 1010 
2$: SUB R5,(R2) ; TEST THE SUB 
BMI 3$ iN:C = 0100 
BNE 3$ 
BvS 3$ 
BCC 4% 
3$: ERROR 1 ;SUB FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) ;CORRECT RESULT ? 
BEQ 181430 :;BR IF YES 
MOV (R2),R3 GET THE WAS DATA 
5$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 


sp eteeererereerrerererererererereererereneneneneeaeenanenerestesete 


s*TEST 430 SUB TEST - SMO,DM1 - N:C = 0000 


sp etereereerereererererereerereterreseeereeeeenenereneneneneeeeee 


181430: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #430,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #77777,R4 sRESULT S / B = 77777 
MOV #+1,R5 ;SRC OPR = 41 
MOV #100000, (R2) ;CDEST] = 100000 
CCC ;CLEAR FLAGS 
23: SUB R5,(R2) ; TEST THE SUB 
eM] BS 3N:C = 0010 
BEQ 3$ 
BvC 3$ 
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030112 
030114 
030116 
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030122 


030124 
030126 


030130 


030160 


030162 
030164 
030166 
030170 
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103001 
104001 


020412 
001402 


011203 
104001 


000266 
161503 
100003 
001402 
102401 
103401 
104002 


020403 
001401 


104002 


000004 


000272 
161503 
100403 


103001 


ost 
79 
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_~—rn 
“” 
— 
“” 


000431 
030110 
177777 
064034 


000432 
030160 


063324 


E 13 
a a ee def 11-SEP-79 13:53 PAGE 161 
1430 - SMO,DRM1 - N:C = 0000 

BCC ot 
38: ERROR 1 ;SUB FAILED TO ALTER CODES PROPERLY 
4%: CMP RG, (R2) CORRECT RESULT ? 

BEQ 1$1431 BR IF YES 

MOV (R2),R5 ;GET THE WAS DATA 
5$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 


a Gp en, er taba og ari atm ete EE LAE i i a mii 


s*TEST 431 SUB TEST = SM1,DM0 - N:C = 0110 


;,eeetererererereerererererteereereereetenereteneneneetenetereetee 


TST431: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #431,R0 :;LOAD RO wilh TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH bf INSTRUCTION WORD 
MOV #-1,R4 sRESULT S / B = 177777 
MOV #0WTB+2, R5 sSRC ADDR = DWIB+2 
CLR R3 :(DEST) = 000000 
ccc sCLEAR FLAGS 
266 N:C = 0110 
23: SUB (R5),R3 ;TEST THE SUB 
BPL 3% 3N:C = 1001 
BEQ 3$ 
Bvs 3$ 
BCS 4% 
3$: ERROR 2 ;SUB FAILED 10 ALTER CODES PROPERLY 
4$: CMP R4,R3 sCORRECT RESULT ? 
BEQ 181432 ;;BR IF YES 
5$: ERROR 2 ;SUB DELIVERED THE WRONG RESULT 


jp ererererererererrererererererereretereneaeeeteeeeesAneeseseneee 
s*TEST 432 SUB TEST - SM1,DM0 - N:C = 1010 


sp eeerererererererersereerererereserenesasesesenesenenesesertenese 


1$1432: 


SCOPE “ALL THE SCOPE LOOP UTILITY 
MOV #432,R0  TLOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
CLR RG RESULT S / B = 000000 
MOV #DWTA+2,R5 sSRC ADDR = DWTA+2 
MOV (RS) ,R3 :CDEST) = 177777 
CCC :CLEAR FLAGS 
272 3N:C = 1010 
23: SUB (R5),R3 ; TEST THE SUB 
BM] 3$ sN:C = 0100 
BNE 3% 
BvS 3$ 
BCC 4% 


SEQ cs 
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030244 
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030260 


030316 
030320 
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104002 
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001402 
102401 
103401 


000433 
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000434 
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a a 30A(1052) 
1432 SUB TEST = SM1,DRO - 


3$: ERROR 2 

43: CMP RS,R3 
BEQ 181433 

5$: ERROR 2 


11-SEP-79 


;SUB FAILED TO ALTER CODES PROPERLY 
: CORRECT RESULT ? 
IF YES 


;SUB DELIVERED THE WRONG RESULT 


se eeeeerererercesrerecerererererereerrereerereeseseeeeeeesereeTeee 


S*TEST 433 


SUB TEST = SM1,DMO - N:C 


= 0000 


,, eeeereeererercerveceseesecrerrerersererereeeaneeneeeseneeesenserere 


181433: 


MOV #77777, RG 
MOV #MBUF1,RS 
MOV #100000,R3 


MOV #+1,(R5) 
ccc 
23: SUB (RS) ,R3 
BM] 3$ 
BEQ 3$ 
BvCc 3$ 
BCC 4% 
3$: ERROR 2 
4%: CMP R4,R3 
BEQ TS1434 
5$: ERROR 2 


;CALL THE SCOPE LOOP UTILITY 
3;LOAD RO WITH TEST NUMBER 
s;LOAD R1 WITH TEST INSTRUC 

sRESULT S / B = 77 


wm 


TION WORD 
777 


SRC ADDR =MBUF 1 
;CDESTJ = 100000 
SRC OPR = +1 


; CLEAR FLAGS 
: TEST THE SUB 
= 0010 


;SUB FAILED TO ALTER CODES PROPERLY 


;CORRECT RESULT ? 
::BR IF YES 


;SUB DELIVERED THE WRONG RESULT 


*-@@eeaeteeteetererreeeeeteretereteteeeteereeeeeateteetenateeneeeteeetete 


SUB SM1,DM1 TEST - N:C = 0110 


si eeerererrrreeererererererereerinetereneneeeeeenenereneneereeese 


s*TEST 434 

181434: 
SCOPE 
MOV #434,R0 
MOV a#2$,R1 
MOV #MBUFO,R2 
MOV #-1,RG 
MOV #MBUFI,RS 
MOV w+? (R5) 
CLR (R2) 
CCC 
266 

2%: SuB (RS), (R2) 
BPL 3$ 
BEQ 3$ 
Bvs 3% 





:CALL THE SCOPE LOOP UTILITY 

3;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

RESULT S / B= 
SOURCE ADDR = MBUF1 
; (SOURCE J = 000001 
:CDEST] = 000000 
;CLEAR FLAGS 

;N:C = 0110 


:TEST THE SUB 
oN:C = 1001 ? 





Pp 
1010 SEQ O16) | 








61 
1 





























MACY11 50A(1052) 11-SEP-79 
1434 SUB SM1,DM1 TEST = N: 


AGE 163 

0 SEQ 0162 
8694 
aene 030332 104001 3$: ERROR 1 ;SUB FAILED TO ALTER CODES PROPERLY 


86 

8697 030334 020412 4%: CMP R4,(R2) ; CORRECT RESULT ? 

ote 030336 001402 BEQ 1$1435 ;;BR IF YES 

8700 030340 011203 MOV (R2),R3 GET THE WAS DATA 

8701 030342 

8702 

8703 art ~ epee a pena tate arial > 1a tatctnic tata 
8704 TEST 435 SUB SM1,0M2 TEST - N:C = 0110 

8705 -eeeeertererereeeeeeererrerereeeetereeeteeReeenetennereeeeeeeeee 
8706 030344 181435: 


00004 SCOPE CALL THE SCOPE LOOP UTILITY 


104001 5$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 
0 
8708 030346 012700 000435 MOV #435,R0 3;LOAD RO WITH TEST NUMBER 
8709 030352 013701 030406 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8710 030356 012702 063312 MOV #MBUFO,R2 DEST ADDR = MBUFO 
8711 030362 012704 177777 MOV #-1,R4 RESULT S / B = 177777 
8712 030366 012705 063316 MOV #MBUF I, RS ;SOURCE ADDR = MBUFI 
8713 030372 012715 900001 MOV #+1,(R5) ;CSOURCEJ = 000001 
8714 030376 005012 CLR (R2) (DEST = 000000 
8715 030400 010203 MOV R2,R3 :R3 GETS DEST ADDR 
8716 030402 000257 CCC — FLAGS 
are 030404 000266 266 = 0110 
he 030406 161523 2$: SUB (R5),(R3)¢ TEST THE SUB 
8721 030410 100003 BPL 3$ 3N:C = 1001 ? 
8722 030412 001402 BEQ 3% 
872% 030414 102401 BvS 3$ 
BySe 030416 103401 BCS 4$ 
+5 | 030420 104005 3$: ERROR 5 ;SUB FAILED TO ALTER CODES PROPERLY 
8728 030422 020412 4$: CMP R4,(R2) :CORRECT RESULT ? 
4434 030424 001402 BEQ 181436 ::BR IF YES 
8731 030426 011203 MOV (R2),R3 GET THE WAS DATA 
arat 030430 104001 5$: ERROR 1 ;SUB DELIVERED THE WRONG RESULT 
tt ppeeeeeeereerreeecerereetereereerreeeteteeteeeteneeeeeeReRereeee 
8735 s*TEST 436 NEG DM2 TEST 
8736 rp eeeeeererererrereeertereereeeeeretinereteeenereeeeeeeneneeerees 


0004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
2700 000436 MOV #436,R0 3;LOAD RO WITH TEST NUMBER 

3701 030464 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
sie 063312 MOV #MBUFO, R2 ;DEST ADDR = MBUFO 
0 


8742 030450 704 125252 MOV #125252 ,R4 sRESULT S / B = 125252 
8743 039454 205 MOV R2,R5 :CR5J] = DEST ADDR 
8744 030456 012712 052526 MOV #52526, (R2) ;CDEST] = 52526 
he 030462 600257 ccc SCOPE SYNC 
46 
the 030464 005425 2$: NEG (R5)¢ :TEST THE NEG - MODE ? 
4 


030466 020412 CMP R4,(R2) RESULT = 125252? 





8737 030432 151436: 
| 
| 
| 
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030544 
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030550 
030552 


030554 
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030562 


030564 


030616 
930620 
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030624 


030626 
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001402 


011203 
104001 


022705 
001401 


104005 


020412 
001402 


011203 
104001 


022705 
001401 


104005 


020412 
001402 


011203 
104001 
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063314 


000437 


052526 


063310 


000440 
030620 
063312 
125252 
063314 
052526 


MACY11 30A(1052) 
1456 GD 


3$: 
4%: 


5$: 


sp, eeererercerrerrrerererererreresererteeerereneeeetenentereneeeeee 


NEG DM2 
BEQ 


MOV 
ERROR 


CMP 
BEQ 


ERROR 


SeTEST 437 


*“s@@enteterererereeererteterterertereteteteeneeeneeteeteetetaeteterenenee 


181437: 


23: 


3$: 
4%: 


5$: 


ERROR 


H 13 
11-SEP-79 13: 
TEST 

4% 

(R2),R3 

! 
#MBUFO+2,R5 
181437 


5 


NEG DM3 TEST 


#MBUFO,R2 
#125252 ,R4 
#ATA+10,R5 
#52526, (R2) 
a(R5)+¢ 
R4,(R2) 

4$ 

phate 


MATA+12,R5 
T$1440 


5 


53 PAGE 164 


;BR IF YES 


;GET THE WAS DATA 
NEG DELIVERED WRONG RESULT 


;D1D REG. GET AUTO INCREMENTED? 
;;BR IF YES 


;NEG FAILED TO UPDATE REG. 


;CALL THE SCOPE LOOP UTILITY 
3;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

sRESULT S / B = 125252 

;CATA+10] = MBUFO 

;(DESTJ = $2526 

;SCOPE SYNC 


TEST THE NEG = MODE 5 


sRESULT = 125252? 
:BR IF YES 


;GET WAS DATA 
NEG DELIVERED WRONG RESULT 


;DID REG GET AUTO INCREMENTED? 
3;:BR IF YES 


7NEG FAILED TO UPDATE REG. 


*“s@@@eteeteretereereetereteteeteeeeeeteteteeeteeteeteeeeneeeeeeeeeeneee 


s*TEST 440 


-‘@erereteeterrreerteeeeeteeterereeretetetetenteekteeeeeeweteteteneete 


151440: 


23: 


3$: 


OPE 


MOV 
ERROR 


NEG DM4 TEST 


#440,R0 
a#2$,R1 
#MBUFO,R2 
#125252,R4 
#@MBUFO+2,R5 
#52526, (R2) 


-(R5) 
R4,(R2) 
4% 


(aa) 23 


CALL THE SCOPE LOOP UTILITY 

7;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

sRESULT S / B = 125252 

;CR5] = DEST ADDR + 2 

:CDEST] = 52526 

; SCOPE SYNC 


TEST THE NEG = MODE 4 


sRESULT = 125252? 
:BR IF YES 


;GET WAS DATA 
NEG DELIVERED WRONG RESULT 


SEQ 


——_—-—_- __-- —- 


1 13 


CQKDA-D KDI1-K Bw +) LOGIC TESTS MACY11 30A(1052) 11-SEP=79 13:53 PAGE 165 

CQKDAD.P11 11-SEP-79 13:31 1440 NEG DMG TEST SEQ 0164 
8806 
8807 030632 020562 4$: CMP R5,R2 ;D1D REG GET AUTO INCREMENTED? 
8808 030634 001401 BEQ TS1441 ;;BR IF YES 


9 
8810 030636 104005 5$: ERROR 5 NEG FAILED 10 UPDATE REG 
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030674 


030676 
030700 


030702 
030704 


030706 
030712 


030714 


030716 


030750 
030752 


030756 
030760 


030762 
030764 


C LO 
11-SEP-79 


Ont et et ees ot E> 


020412 
001402 


011203 
104001 


022705 
001401 


104005 


000004 


000257 
005465 


020412 
001402 


011203 
104001 


000441 


052526 


063306 


000442 


052526 


000002 


000443 
031022 
063312 


ie | 


MACY11 30A(1052) 11-SEP-79 52 PAGE 166 
1440 NEG DMG TEST SEQ 0165 
s,eeeeeereererrrrrererererereerrerererereereneeeeeereeteneeetenee 
s*TEST 441 NEG DMS TEST 
pp etter erereerrerereerererererererereereteteneteeeeeeeeeeeeeeeeee 
TS1461: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #441,R0 7;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
MOV #125252,R4 sRESULT S / B = 125252 
MOV WATA12,R5 :(R5) = (ADR OF MBUFO) +2 
MOV #52526, (R2) sCDEST] = 52526 ; 
CCC SCOPE SYNC 
2%: NEG a-(R5) TEST THE NEG - MODE 5 
CMP R4,(R2) sRESULT = 125252? 
BEQ 4% sBR IF YES 
MOV (R2),R3 GET WAS DATA 
3$: ERROR 1 NEG DELIVERED WRONG RESULT 
4$: CMP WATA+10,R5 7D1D NEG UPDATE REG 
BEQ 181442 37BR IF YES 
5$: ERROR 5 NEG FAILED TO UPDATE REG 
seit eeeeeerererereerereerereereneteeeteneneeeeteneetenerenennneeee 
S*TEST 442 NEG DM6 TEST 
Pp teeeerearererererererierenerenereneeeeeeRateeeteneeeeareneneeee 
TS1442: 
SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #442,R0 ::LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
MOV #125252,R4 RESULT S / B = 125252 
MOV #MBUFO-2,R5 ;CR5] = BASE ADDR 
MOV #52526, (R2) CDEST] = 52526 
CCC :SCOPE SYNC 
2$: NEG 2(R5) TEST THE NEG - MODE 6 
CMP RG, (R2) sRESULT = 125252? 
BEQ TS$1443 ;BR IF YES | 
MOV (R2),R3 ‘GET WAS DATA 
3$: ERROR 1 sNEG DELIVERED WRONG RESULT | 
sperereererreerererererereesereeereserenerenenenenereteneeesesere 
TeTEST 443 NEG DM7 TEST 
SF eeeeeercersersereereceserrereeseeeseeeeesesesasessenensesereeess 
181443: | 
SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #443,R0 >;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV @MBUFO,R2 DEST ADDR = MBUFO 
| 
9 
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8867 


031032 
031034 


031036 


031072 
031074 
031076 


AAA 
> SF wwwnrvrwr 
Soo fofnwr 
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020412 
001402 


011203 
104001 


000004 


000264 
011513 
100003 


103001 
104001 


020412 
001403 


005003 
051203 
104001 


000004 


012705 


000444 
031074 


063312 
063324 


000445 
031160 


063312 
063524 


' 
| 


K 13 - ahh nae «47 

MACY11 50K 1052) 11-SEP=79 13:53 PAGE 167 | 
1443 NEG TEST SEQ 0166 | 

MOV #125252, RG RESULT sf 18: : yf2d252 

MOV #ATA,RS :(R5) = 

MOV #52526, (R2) test) © : stra 

ccc ;SCOPE SYNC 
23: NEG al0(Rrs) ;TEST THE NES - MODE 7 

CMP RG, (R2) sRESULT = 125252? 

BEQ TS1444 : BR IF YES 

MOV (R2),R3 3GET WAS DATA 
3$: ERROR 1 sNEG DELIVERED WRONG RESULT 
ee 
s*TEST 444 MOV SM1,0M1 TEST - N:C = 0100 


sy eerererererrererrereeerrrererreettereeeeeKeeeaeeRereeeneeeenee se 


TST444: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #444 ,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 sRESULT S / B = 177777 

COM RG 

MOV #MBUFO,R2 7DEST ADDR = MBUFO 

MOV #DWTA+2,R5 ;SOURCE ADDR = DWTA+2 

MOV R2,R3 :BASE DEST ADDR = MBUFO 

CLR (R2) >MAKE CDEST] = 000000 

CCC s;CLEAR FLAGS 

264 N:C = 0100 
2s: MOV (R5),(R3) sTEST THE MOV - SM1,DM1 

BPL 3$ sN:C = 1000 ? 

BEQ 3$ 

Bvs 3$ 

BCC 4% 
3$: ERROR 1 sMQv FAILED TC ALTER CODES PROPERLY 
4$: CMP R4,(R2) ;RESULT CORRECT ?? 

BEQ 181445 7;BR IF YES 

CLR R3 ;GET THE WAS DATA 

BIS (R2),R3 
5$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
speteerererereerrerreretereriaonererenenseareesaeeeeeaeseseresesees 
s*TEST 445 MOV SM2,0M1 TEST - N:C = 0100 
speeeerereererrrereeerereceeresereneereraneneeeneeeeeeeeseeeeeeesS 
TS1445: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #445,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 ;RESULT S / B = 177777 

COM RG 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV MDWTA+2 RS ;SOURCE ADDR = DwIA+2 


L 13 
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CQKDAD.P11 11-SEP-79 13:31 445 MOV SM2,0M1 TEST - N:C = 0100 SEQ 0167 
8923 031150 010203 MOV R2,R5 —_ DEST ADDR = MBUF 0 
8924 031152 005012 CLR (R2) MAKE CDESTJ = 000000 
8925 031154 000257 ccc CLEAR FLAGS 
245] 031156 000264 264 :N:C = 0100 
aaSe 031160 012513 23: _ MOV (R5)+,(R3) ;TEST THE MOV = SM2,DM1 
8930 031162 100003 BPL 3$ iN:C = 1000 ? 
8931 031164 001402 BEQ 3$ 
8932 031166 102401 BvS 3$ 
aett 031170 103001 BCC 4$ 
444 031172 104001 3$: ERROR 1 :MOvV FAILED 10 ALTER CODES PROPERLY 
8937 031174 020412 4$: CMP R4,(R2) RESULT CORRECT ?? 
poh 031176 001403 BEQ TS1446 3;BR IF YES 
8940 031200 005003 CLR R3 ;GET THE WAS DATA 
8941 031202 051203 BIS (R2),R3 
eect 031204 104001 5$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
8944 ;pteeeeererrrrrererrerrerrereereeereeereeeeeeeeneteeeeeeeeee eee 
8945 s*TEST 446 MOV SM1,DM1 TEST = N:C = 1011 
8946 ppeteeeeeeeeerereeeeeertreneeeeetterereeeeeeeee eee eee 
8947 031206 TST446: 
8948 031206 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
8949 031210 012700 000446 MOV #446,R0 3;LOAD RO WITH TEST NUMBER 
8950 031214 013701 031244 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
8951 031220 005004 CLR R4 sRESULT S / B= 000000 
8952 031222 012702 063312 MOV #MBUFO,R2 DEST ADDR = MBUFO 
8953 031226 012705 063322 MOV #DWTA,RS ;SOURCE ADDR = DWTA 
8954 031232 010203 MOV R2,R3 ;BASE DEST ADDR = MBUF 0 
8955 031234 005012 CLR (R2) sMAKE CDEST] = 177777 
8956 031236 005112 COM (R2) 
8957 031240 000257 ccc CLEAR FLAGS 
hs 031242 000273 273 zN:C = 1011 
tse 0312464 011513 2$: MOV (R5),(R3) : TEST THE MOV - SM1,DM1 
8962 031246 100403 BMI 3$ 3N:C = 0101 ? 
8963 031250 001002 BNE 3$ 
8964 031252 102401 BvS 3$ 
Bees 031254 103401 BCS 4$ 
ee 031256 104001 3$: ERROR 1 :MOV FAILED TO ALTER CODES PROPERLY 

6 

8969 031260 020412 4$: CMP R4,(R2) ;RESULT CORRECT ?? 
ay 031262 001403 BEQ TS1447 ::BR IF YES 
8972 031264 005003 CLR R3 GET THE WAS DATA 
8973 031266 051203 BIS (R2),R3 
oh 931270 104001 5$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
eee eater eeeeeeeee eee eee ee eeeee eee eeee eee AeA eee eee 
8977 TEST 447 MOV SM2,0M1 TEST - N:C = 1011 


8978 :: were eererereeeeeeeteeeereieteeeeeeeeeeekeeeeeeeeeeeeeeeeeteeeense 
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CQKDAD.P11 11-SEP-79 13:31 1447 MOV SM2,DM1 TEST - N:C = 1011 ’ SEQ 0168 
8979 031272 TS1447: 
8980 031272 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
8981 031274 012700 000447 MOV #447,R0 :;LOAD RO WITH TEST NUMBER 
8982 0313500 013701 031330 MOV a#2$,R1 ;LOAD R1 ex TEST INSTRUCTION WORD 
89835 031304 005004 CLR R4 ;RESULT S / B = 000000 
8984 031306 012702 063312 MOV #PMBUFO,R2 ;DEST ADDR = MBUFO 
8985 031312 012705 0633522 MOV #OWTA,RS ; SOURCE or = DWTA 
8986 031316 010203 MOV R2,R5 :BASE DEST ADDR = MBUFO 
8987 031320 005012 CLR (R2) ;MAKE (DEST) = 177777 
8988 031322 005112 COM (R2) 
8989 031324 000257 ccc CLEAR FLAGS 
day, 031326 000273 273 sN:C = 1011 
444 031330 012513 2$: MOV (R5)4+,(R3) ;TEST THE MOV - SM2,DM1 
8994 031332 100403 BMI 3$ 3N:C = 0101 ? 
8995 031334 001002 BNE 3$ 
8996 031336 102401 BvS 3$ 
oad 031340 103401 BCS 4% 
8999 031342 104001 3¢: ERROR 1 ;MOV FAILED TO ALTER CODES PROPERLY 
9001 031344 020412 4$: CMP R4,(R2) sRESULT CORRECT ?? 
oot 031346 001405 BEQ T$1450 :;BR IF YES 
9004 031350 005903 CLR R3 :GET THE WAS DATA 
9005 031352 051203 BIS (R2),R5 
coor 031354 104001 5$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
9008 ee ee ee 
9009 s*TEST 450 MOV SM1,DM2 TEST - N:C = 0100 
9010 ppteeeeeererrerrerererrrterteeerereterrineeAeAA AeA eRe AeA 
9011 031356 TS1450: 
9012 031356 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
9013 031360 012700 000450 MOV #450,R0 ;;LOAD RO WITH TEST NUMBER 
9014 031364 0135701 031414 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
9015 031370 005004 CLR R4 sRESULT S / B = 177777 
9016 031372 005104 COM R4 
9017 031374 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = yp 
9018 031400 012705 063324 MOV #DWTA+2,R5 SOURCE ADDR = D’./ 
9019 031404 010203 MOV R2,R5 sBASE DEST ADDR = MBUF 
9020 031406 005012 CLR (R2) sMAKE CDEST) = 000000 
9021 031410 000257 ccc Ho FLAGS 
se 031412 000264 264 = 0100 
oo5e 031414 011523 2$: MOV (R5),(R3)¢ ;TEST THE MOV - SM1,DM2 
9026 031416 100003 BPL 3$ iN:C = 1000 ? 
9027 031420 001402 BEQ 3$ 
9028 031422 102401 BVS 3$ 
p59 031424 103001 BCC 4% 
4 031426 104001 3$: ERROR 1 ;MOv FAILED TO ALTER CODES PROPERLY 
9 
9033 031430 022703 063514 4$: CMP #MBUFO+2,R3 ;D1D MOV INCREMENT DEST REG ? 
9034 031434 001401 BEQ 6$ :BR IF YES 
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CQKDAD.P11 11-SEP-79 13:31 1450 MOV SM1,DM2 TEST - N:C = 0100 SEQ 0169 
9035 
bait 031436 104005 5$: ERROR 5 :MOV FAILED TO UPDATE DEST REG 
9038 031440 020412 6$: CMP R4,(R2) RESULT CORRECT ?? 
bs 031442 001403 BEQ TS1451 7 BR IF YES 
9041 031444 005003 CLR R3 GET THE WAS DATA 
9042 031446 051203 BIS (R2),R5 
so 031450 104001 7$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
9045 gs Se oeeeererererororoooorrcesesesesereenesssonosoonooesosooescets 
9046 s*TEST 451 MOV SM2,D0M2 TEST - N:C = 0100 
9047 is eeeeeerereeerereerertererreceetetteerererereeerereerereereerers 
9048 031452 TS1451: 
9049 031452 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
9050 031454 012700 000451 MOV #451,R0 ;LOAD RO WITH TEST NUMBER 
9051 031460 013701 031510 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
9052 031464 005004 CLR RG RESULT S / B = 177777 
9053 031466 005104 COM RG 
9054 031470 012702 063312 MOV #MBUFO,R2 DEST ADDR = MBUFO 
9055 031474 012705 063324 MOV #DWTA+2,R5 ;SOURCE ADDR = DWIA 
9056 031500 010203 MOV R2,R3 BASE DEST ADDR = MBUFO 
9057 031502 005012 CLR (R2) :MAKE CDESTJ = 000000 
9058 031504 000257 ccc 7CLEAR FLAGS 
hs 031506 000264 264 NEC = 0100 
yaad! 031510 012523 23: MOV (R5)4+,(R3)+ : TEST THE MOV = SM2,DM2 
9063 031512 100003 BPL 3$ :N:C = 1000 ? 
$064 031514 001402 BEQ 3% 
9065 031516 102401 BvS 3$ 
ree 031520 103001 BCC 4$ 
pay 031522 104001 3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPERLY 
9070 031524 022703 063314 4$: CMP . #MBUFO+2,R3 :D1D MOV INCREMENT DEST REG ? 
p+ 4 031530 001401 BEQ 6% ;BR IF YES 
ys 031532 104005 5$: ERROR 5 :MOV FAILED TO UPDATE DEST REG 
9075 031534 020412 6$: CMP R4,(R2) RESULT CORRECT ?? 
po th 031536 001403 BEQ TST452 3;BR IF YES 
9078 031540 005003 ; CLR R3 GET THE WAS DATA 
9079 031542 051203 BIS (R2),R3 
9080 031544 104001 e 7$: ERROR 1 7MOV DELIVERED THE WRONG RESULT 
ie} js eaveneceresorccororeeteeereseeseNesensosssenesooesseonesooee® 
9085 z*TEST 452 MOV SM1,0M3 TEST - N:C = 0100 
9084 ls eeeereeerereeeteteterereerereretrreeeteeeeeenenenenenereeeeeess 
9085 031546 TS1452: 
9086 031546 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
9087 031550 012700 000452 MOV #452,R0 :;LOAD RO WITH TEST NUMBER 
9088 031554 013701 031606 MOV a#2$,R1 LOAD R1 a TEST INSTRUCTION WORD 
9089 031560 005004 CLR R4 sRESULT S / B = 177777 
9090 031562 005104 COM R4 
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CQKDAD.P11 


9112 


ooonoovovono 


COOOnNO Uw 


031632 
031634 


031636 


031640 
031642 


031644 


031702 
031704 
031706 


031714 
031716 


031720 
031724 


11-SEP- 


103001 
194001 


022703 
001401 


104005 


020412 
001403 


005003 


051203 
104001 


000004 


000264 
012533 
100003 


103001 
104001 


022703 
001401 


063310 


000453 
031704 


063312 
063324 
063306 


063310 


MACYT1 30A(1052) 
1452 


23: 


7$: 


81 
11-SEP-79 


13: 53 PAGE 171 
00 


MOV SM1,DM5 TEST - N:C = J] 


CLR 
S 
ERROR 


#mBuFO,R2 
#DWTA+S RS 
#ATA*10,R3 
(R2) 


(R5) ,a(R3)¢ 


1 
MATA*12,R3 
6$ 


5 
RG, (R2) 
TS1453 


R3 
‘ete 


;DEST ADDR = MBUFO 


: SOU ADDR = DwTA+2 
a te DEST ADDR = ATA+10 
MAKE greet = 000000 
:CLEAR f LA 
e100 
;TEST THE MOV = SM1,DM3 
zN:C = 1000 ? 


MOV FAILED TO ALTER CODES PROPERLY 


;D1D MOV INCREMENT DEST REG ? 
;BR IF YES 


;MOV FAILED TO UPDATE DEST REG 


RESULT CORRECT ??7 
7:BR IF YES 


GET THE WAS DATA 
;MOV DELIVERED THE WRONG RESULT 


-s@eeaeeeerereerretereteereteeeteteterereteteeeeeeeeeeneteeeeeeneeete 


s*TEST 453 


pp etewrererererererrerererererereereeeeretenenenenetenenereseetee 


181453: 


23: 


3$: 


MOV SM2,0M35 TEST - N:C = 


#MBUFO,R2 
#DWTA42,R5 
#ATA+10,R3 
(R2) 


(R5)+,a(R5)¢ 


MATA+12,R3 
6$ 


= 0100 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
sRESULT S / B = 177777 


;DEST ADDR = MBUFO 
;SOURCE ADDR = DWTA+2 
;BASE DEST ADDR = ATA+10 


:MAKE CDEST] = 000000 

; CLEAR FLAGS 

7N:C = 0100 

TEST THE MOV - SM2,DM3 
3N:C = 1000 ? 


;MOV FAILED TO ALTER CODES PROPERLY 


sDID MOV INCREMENT DEST REG ? 
sBR IF YES 


SEQ 0170 
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032000 
032002 
032004 
032006 
032010 
032012 
032014 


032016 
032020 


032022 


032024 
032026 


032030 
032032 
032034 


032036 


032054 


11-SEP-79 
104005 
020412 
001403 
005003 
051203 
104001 


000004 


000264 
011543 


100003 
001402 
102401 
103001 


104001 


020205 
001401 


104005 


020412 
001403 


005003 
051203 
104001 


000004 
012700 
013701 
005004 


005104 
012702 


€ TESTS 
13:31 


000454 
032002 


063312 
063324 
063314 


000455 
032076 


063312 


C 14 
MACY11 SOA(1052) 11-SEP-79 13:53 PAGE 172 
1453 C = 9100 


MOV SAZ,0M3 TEST - N: SEQ 0171 
5$: ERROR 5 sMOV FAILED TO UPDATE DEST REG 
6$: CMP R4,(R2) sRESULT CORRECT 7? 

BEQ TS1454 3;BR IF YES 

CLR R3 7GE1 THE WAS DATA 

BIS (R2),R3 
7$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
ee er ee 
s*TEST 454 MOV SM1,0M4 TEST - N:C = 0100 
MITITITITITITIITI TIT L 
151454: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #454 ,R0 3;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

CLR RG sRESULT S / B = 177777 

COM RG 

MOV #MBUFO,R2 sDEST ADDR = MBUFO 

MOV #DWTA+2,R5 ;SOURCE ADDR = DWTA+2 

MOV #MBUFO+2,R35 BASE DEST ADDR = MBUF 042 

CLR (R2) ;MAKE CDEST) = 000000 

ccc tr ge FLAGS 

264 0100 
2$: MOV (R5),-(R3) ; TEST THE MOV - SM1,DM4 

BPL 3% zN:C = 1000 ? 

BEQ 3$ 

BvsS 3% 

BCC 4% 
3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPERLY 
4$: CMP R2,R3 :D1D MOV DECREMENT DEST REG ? 

BEQ 6% sBR IF YES 
5$: ERROR 5 sMOV FAILED TO UPDATE DEST REG 
6$: CMP R4,(R2) sRESULT CORRECT ?? 

BEQ TS1455 7;BR IF YES 

CLR R3 ;GET THE WAS DATA 

BIS (R2),R3 
7$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
pp eeererererererrerererererereeeeeerereneerenatenaterensenesere Te 
s*TEST 455 MOV SM2,0M4 TEST - N:C = 0100 
spteerecreeserserarrereeserceserereserersereeeesesesesesaseeseeee 
1S1455: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #455,R0 > LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

CLR RG RESULT S$ / B = 177777 

COM RG 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 





4 Mov sDWTA+2,R5 ; SOURCE ADDR = DwtAe2 

03 0 4 MOV #MBUFO+2,R3 ASE DEST ADDR = MBUFO+2 
9205 032070 005012 CLR (R2) MAKE tobet) = 000000 

9206 032072 000257 CCC “CLEAR FLAGS 

9207 032074 000264 264 =N:C = 0100 


9209 032076 0125435 2%: MOV (R5)¢,=(R3) ;TEST THE MOV - SM2,DM4 
9211 032100 100003 BPL 3$ 3N:C > 1000 ? 


9214 032106 103001 BCC 4% 
9216 032110 104001 3$: ERROR 1 MOV FAILED TO ALTER CODES PROPERLY 


9218 032112 020203 4$: CMP R2,R3 01D MOV INCREMENT DEST REG ? 
9219 032114 001401 BEQ 6$ ;BR IF YES 


9221 032116 104005 5$: ERROR 5 :MOV FAILED TO UPDATE DEST REG 


9223 032120 020412 6$: CMP RG, (R2) sRESULT CORRECT ?? 
9224 032122 001403 BEQ 181456 ::BR IF YES 


9226 032124 005003 CLR R3 ;GET THE WAS DATA 
9227 032126 051203 BIS (R2),R3 
aS5s 032130 104001 7$: ERROR 1 ;MOV DELIVERED THE WRONG RESULT 


9230 pe eeeeerertererereerereerererereerereeetereeeeeenenterereeeeeret 
9231 :*TEST 456 MOV SM1,DM5 TEST = N:C = 0100 

9232 + eee eeeeeterereeetereerererererereeeerenereReReeeereeeerenTenere 
9233 032132 1S1456: 

9234 032132 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

9235 032134 012700 090456 MOV #456,R0 7;LOAD RO WITH TEST NUMBER 

9236 032140 013701 032204 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
9237 -SBTTL USER CONTROLLED BREAKPOINT -- BIT9 

9238 032144 032737 001000 065234 BIT ar @#BPTLOC ;BREAKPOINT HALT SET ?? 

9239 032152 001401 BEQ ;BR IF NOT 

9240 032154 000000 HALT [BREAK - DEPRESS CONTINUE TO RESTART 
9241 032156 005004 CLR RG RESULT S / B = 177777 


RG 
312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
9244 032166 012705 063324 MOV #DWTA2,R5 ;SOURCE ADDR = DWIA+2 
310 MOV MATA+12,R5 ;BASE DEST ADDR = ATA+12 
9246 032176 005012 CLR (R2) MAKE CDESTJ = 000000 
9247 032200 000257 ccc CLEAR FLAGS 
9248 032202 000264 264 3N:C = 0100 


9250 032204 011553 2$: MOV (R5) ,a-(R3) TEST THE MOV - SM1,DMS 


9252 032206 100003 BPL 3$ sN:C = 0100 ? 
9253 032210 001402 BEQ 3$ 
9254 032212 102401 Bvs 3$ 
9255 032214 103001 BCC 4$ 


D 14 : " A 
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CQKDAD.P11 11-SEP-79 13:31 1455 v SA2,DM4 TEST = N:C = J100 S€Q 0172 
5 32 

3 31 

9257 032216 104001 3$: ERROR 1 :MOV FAILED TO ALTER CODES PROPERLY 
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032300 
032302 
032504 
032306 
032310 
032312 
032314 


032316 
032322 


032524 
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022705 
001401 
104005 


020412 
001403 


005003 


051203 
104001 


000004 


000264 
012553 
100003 
001402 
102401 
103001 
104001 


022703 
001401 


104005 


020412 
001403 


005003 
051203 
104001 


063306 


000457 
032302 


063312 
063324 
063310 


063306 


009004 
012700 000460 


013701 


032400 


E 14 
MACY11 30A(1052) 11-SEP-79 13:53 PAGE 174 
USER CONTROLLED BREAKPOINT -- BIT? 


4%: CMP #ATA*10,R3 :D1D MOV DECREMENT DEST REG ? 

BEQ 6$ ;BR IF YES 
5$: ERROR § ;MOV FAILED TO UPDATE DEST REG 
6$: CMP RG, (R2) sRESULT CORRECT ?? 

BEQ 1$1457 > BR IF YES 

CLR R3 :GET THE WAS DATA 

BIS (R2),R3 
7$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
jy eerererrrererrrerererererererereerererenatenenereneteeseteeTeeee 
s*TEST 457 MOV SM2,0M5 TEST - N:C = 0100 
sy eteeererererererrererrerereereeerereneeneneenenerenereseneeteee 
181457: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #457,R0 >: LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 sRESULT S / B = 177777 

COM RG 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #DWIA42,R5 ;SOURCE ADDR = DWTA+2 

MOV MATA412,R3 ;BASE DEST ADDR = ATA+12 

CLR (R2) :MAKE CDESTJ] = 00000 

ccc ;CLEAR FLAGS 

264 N:C = 1000 
2$: MOV (R5)+,a-(R3) : TEST THE MOV - SM2,DM5 

BPL 3$ iN:C = 1000 ? 

BEQ 3% 

BvS 3$ 

BCC 4% 
3$: ERROR 1 s;MOvV FAILED TO ALTER CODES PROPERLY 
4$: CMP MATA+10,R3 ;D1D MOV DECREMENT DEST REG ? 

BEQ 6$ :BR IF YES 
5$: ERROR 5 sMOV FAILED TO UPDATE DEST REG 
6$: CMP R4,(R2) sRESULT CORRECT ?? 

BEQ 181460 +: BR IF YES 

CLR R3 sGET THE WAS DATA 

BIS (R2),R3 
7$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
sleererecececevesseresereesrereresereserasereeaeeseseneeseneseels 
:*TEST 460 MOV SM1,0M6 TEST - N:C = 0100 


*seevereeeeeceorerarererrreesereseNeseseaseseseretesesnaeneseseles 


151460: 


SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #46),R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WIlTh TEST INSTRUCTION WORD 


SEQ 0173 
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COKDAD.P11 11-SEP-79 13:31 1460 1,096 TEST - N:C = J100 SEQ 0174 
9315 032352 005004 CLR RG sRESULT S / B = 177777 
9316 032354 005104 COM RG 
9317 032356 012702 063320 MOV #MBUFO+6,R2 DEST ADDR = MBUFO+6 
9318 032362 012705 063324 MOV #DWTA+2,R5 :SOURCE ADDR = DWIA+2 
9319 032 012703 063312 MOV #MBUFO,RS > BASE DEST ADDR = MBUFO 
9320 032372 005012 CLR (R2) [MAKE (DEST) = 000000 
9321 032374 000257 ccc CLEAR FLAGS 
east 032376 000264 264 3N:C = 0100 
pa 032400 011563 000006 23: MOV (R5) ,6(R3) : TEST THE MOV - SM1,0M6 
9326 032404 100003 BPL 3$ iN:C = 1000 ? 
9327 032406 001402 BEQ 3$ 
9328 032410 102401 BvS 3$ 
4594 032412 103001 BCC 4% 
4+ 4 032414 104001 3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPERLY 
9333 032416 020412 4%: CMP R4,(R2) ;RESULT CORRECT ?? 
4 tn 032420 001403 BEQ 181461 ;:BR IF YES 
9336 032422 005003 CLR R3 7GET THE WAS DATA 
9337 032424 051203 BIS (R2),R3 
Hf 032426 104001 5$: ERROR 1 :MOV DELIVERED THE WRONG RESULT 
9340 +s@weeeeeteteteteeeerteretereeereeeeereteteteeeeeneeneeeeeeneeeeee 
9341 eTEST 461 MOV SM2,0M6 TEST - N:C = 0100 
9342 **@eeeeeeeeeteeteeneteetereeteeeeeeeeeeeeetekeeeeeeeetaeteeeteenaeeenaeeeese 
9343 032430 1$1461: 
9344 032430 000004 SCOPE >CALL THE SCOPE LOOP UTILITY 
9345 032432 012700 000461 MOV #461,R0 ::LOAD RO WITH TEST NUMBER 
9346 032436 013701 032470 MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 
9347 032442 005004 CLR R4 sRESULT S / B = 177777 
9348 032444 005104 COM R4 
9349 032446 012702 063320 MOV #MBUFO+6,R2 sDEST ADDR = MBUF 0+6 
9350 032452 012705 063324 MOV #DWTA+2,R5 ;SOURCE ADDR = DWTA+2 
9351 032456 012703 063312 MOV #MBUFO,RS ;BASE DEST ADDR = MBUFO 
9352 032462 005012 CLR (R2) :MAKE CDESTJ = 000000 
9353 032464 000257 ccc sCLEAR FLAGS 
4 te 032466 000264 264 :N:C = 0100 
pe te 032470 012563 000006 2s: MOV (R5)+,6(R3) :TEST THE MOV - SM2,DM6 
9358 032474 100003 BPL 3$ sN:C = 1000 ? 
9359 032476 001402 BEQ 3$ 
9360 032500 102401 Bvs 3$ 
4g! 032502 103001 BCC 4% 
eer 032504 104001 3$: ERROR 1 sMOV FAILED TO ALTER CODES PROPERLY 

4 
9365 032506 020412 4%: CMP RS, (R2) sRESULT CORRECT ?? 
vg 032510 001403 BEQ 181462 >;BR IF YES 
6 

9368 032512 005003 CLR R3 :GET THE WAS DATA 
9369 032514 051203 BIS (R2),R3 
9370 032516 104001 5$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
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ESTS MACY11 350A(1052) 11-SEP-79 3 
1 = 9100 SEQ 0175 


G 14 
13: 5 
1461 MOV SM2,0M6 TEST - N:C = 





Freerwoo 


SELLERS 


032572 
032574 


032576 
032600 


032602 


032604 
032606 


032610 


032646 
032650 


032654 
032656 
032660 
032662 


000004 


000264 
011573 
100003 
001402 
102401 
103001 
104001 


020412 
001403 


005003 


051203 
104001 


000004 


000264 
011573 


100003 
001402 
102401 
103001 


000462 
032560 


063312 
063324 
063276 


000010 


000463 
032650 


063312 
063324 
063276 


000010 


PINE IN pi atta dragged ge tee gehen “2 Ns eta a inlage = > 


s*TEST 462 


181462: 


2$: 


3$: 
4%: 


5$: 


ERROR 


MOV SM1,0M7 TEST - N:C = 0100 


ts eeeeerereeereereerececereereeereeeeereeeeereeereseerreereereere 


R 
#MBUFO,R2 
#OWTAS2, RS 
MATA,RS 
(R2) 


(R5) ,a10(R35) 


1 


R4,(R2) 
181463 


R3 
‘aide 


CALL THE SCOPE LOOP UTILITY 
7;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;RESULT S / B = 177777 


DEST ADDR = MBUFO 
SOURCE ADDR = DWTA+2 
;BASE DEST ADDR = ATA 


MAKE CDESTJ = 000000 
;CLEAR FLAGS 

:N:C = 0100 

> TEST THE MOV - SM1,DM7 
3N:C = 1000 ? 


sMOv FAILED TO ALTER CODES PROPERLY 


;RESULT CORRECT ?? 
37;BR IF YES 


;GET THE WAS DATA 
7MOvV DELIVERED THE WRONG RESULT 


‘seeeerereeerereerereretrrrertereneeeeeretaeeeeeeHeeneneTeeteneee 


MOV SM2,D0M7 TEST - N:C = 0100 


s*TEST 463 


spteeeeererecererererereserrerseerereresenereraenaneeeeeeeaeeteeTe 


TS1463: 


2s: 


#MBUFO,R2 
#DWTA+2,R5 
#ATA,RS 
(R2) 


(R5),a10(R3) 


:CALL THE SCOPE LOOP UTILITY 

:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;RESULT S / B = 177777 


:DEST ADDR = MBUFO 
;SOURCE ADDR = DwWIA+2 
;BASE DEST ADDR = ATA 


>MAKE CDEST] = 000000 
s;CLEAR FLAGS 

sN:C = 0100 

:TEST THE MOV = SM2,DM7 
zN:C = 1000 ? 


CQKDA-D KDI1-K BASIC LOGIC 1 
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CQKDAD.P11 


032664 


032666 
032670 


032672 


032674 
032676 


032700 


032724 
032726 


032730 
032732 


032734 
032736 


032740 
032740 


032764 
032766 


032770 
032772 


032774 
032776 


104001 


020412 
001403 


005003 


051203 
104001 


010015 


020412 
001402 


011203 
104001 


010025 


020412 
001402 


011203 
104001 


000004 


ESTS 
1 


000464 
032726 
063312 


000465 
032766 
063312 


COPE CALL THE SCOPE LOOP UTILITY 


H 14 
MACY11 30A(1052) 11-SEP-79" 13: 5% PAGE 177 
1463 MOV SM2,DM7 TEST = N:C = J100 SEQ 0176 
3$: ERROR 1 MOV FAILED TO ALTER CODES PROPEALY 
4$: CMP RG, (R2) sRESULT CORRECT ?? 
BEQ T$1464 BR IF YES 
CLR R3 GET THE WAS DATA 
BIS (R2),R3 | 
S$: ERROR 1 MOV DELIVERED THE WRONG RESULT 
;,erterrerrererrrerererererrerererrercenereneeeeeneaneeetenerenee 
S*TEST 464 MOV SMO,DM1 TEST 
,,ereererererrrerreerererereerererereereneneeraneneeeeneeeeeanetees 
181464: 
SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #464 ,R0 >;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 DEST ADDR = MBUFO 
MOV RO,RS RESULT S / B = TEST NUMBER 
MOV R2,R5 7R5 GETS DEST ADDR 
CLR (R2) :CDEST] = 000000 
CCC SCOPE SYNC 
2$: MOV RO, (RS) :TEST THE MOV 
CMP RG, (R2) RESULT CORRECT ? 
BEQ TS1465 ::BR IF YES 
MOV (R2),R3 GET THE WAS DATA 
38: ERROR 1 sMOV DELIVERED THE WRONG RESULT 
see eeetereerseeneeeeereereeetenterereneeeeeeeernaneeeneaeeeetenes 
:*TEST 465 MOV SMO,DM2 TEST 
sp eeeeeereererreeseereeeterrereretenereneneneeAaeeeeneneeeeerenes 
TS1465: 
SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #465,R0 ::LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :DEST ADDR = MBUFO | 
MOV RO,R4 :RESULT S / B = TEST NUMBER 
MOV R2.R5 *R5 GETS DEST ADDR 
CLR (R2) :CDEST] = 000000 | 
CCC SCOPE SYNC | 
2%: MOV RO,(R5)¢ :TEST THE MOV 
CMP R4,(R2) ;RESULT CORRECT ? | 
BEQ 181466 3;BR IF YES 
MOV (R2),R3 :GET THE WAS DATA | 
3$: ERROR 1 :MOV DELIVERED THE WRONG RESUiT | 
sleeeeeerercersrererereeerseresereeetreeressenaeserasesereseseetse 
s*TEST 466 MOv SMO,DM3 TEST 
spe eeeeererceeseresrseorereserecereseeeeeaeeeseesesesereneeeseeseene | 
TS1466: | 
} 
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035034 


033036 
033040 


033042 


033070 
033072 


033074 
033076 


033100 
033102 


033134 


033136 
033140 


033142 
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020412 
001402 


011203 
104001 


000004 


000257 
010045 


020412 
001402 


011203 
104001 


010055 


020412 
001402 


011203 


eo 
“3 


000467 
033072 
063312 


063314 


000470 
033134 
063312 


063310 


a 
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1466 MOV SMO,DM3 TEST 

MOV #466 ,RO ;;LOAD RO WITH TEST NUMBER 

;LOAD RI WITH TEST INSTRUCTION WORD 


MOV #MBUFO,R2 DEST ADDR = MBUFO 
MOV RO,R4 sRESULT S / B = TEST NUMBER 
MOV MATA*10,RS ‘BASE DEST ADDR = ATA*10 
CLR (R2) ;CDESTJ = 000000 
ccc : SCOPE SYNC 
2$: MOV RO,a(RS)* : TEST THE MOV 
CMP RG, (R2) ; CORRECT RESULT 
BEQ 181467 3;BR IF YES 
MOV (R2),R3 3;GET THE WAS DATA 
3$: ERROR 1 sMOV DELIVERED THE WRONG RESULT 


pee eeeeeererererererrerereereeereeeeeerenererereeeeeeeneereree 
s*TEST 467 MOV SMO,DM4 TEST 
ppeteeeeeeererereeereerererereerererereeteneeerenteereeneeereeees 
TS1467: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 


MOV #467,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV RO,R4 RESULT S / B = TEST NUMBER 
MOV #MBUFO+2,R5 ZRS CONTAINS BASE DEST ADDR 
CLR (R2) ;CDESTJ = 000000 
ccc ;SCOPE SYNC 

23: MOV RO,-(R5) ;TEST THE MOV 
CMP R4,(R2) ; CORRECT RESULT ? 
BEQ 1S1470 :;BR 1F YES 
MOV (R2),R3 ;GET THE WAS DATA 


3$: ERROR 1 ;MOV DELIVERED THE WRONG RESULT 


Sj eeeeererererrererersertererereresetereneeeeeterereneneeeneretes 
s*TEST 470 MOV SMO,DMS TEST 
sp eteteeerereererererererseresenerereneeasanatanenereneeeeeeeenest 
181470: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 


MOV #470,R0 :;LOAD RO WITH 7EST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO, R2 ;DEST ADDR = MBUFO 
MOV RO,R4 ;RESULT S / B = TEST NUMBER 
MOV #ATA+12,R5 =R5 CONTAINS BASE DEST ADDR 
CLR (R2) ;CDEST] = 000000 
ccc : SCOPE SYNC 
2%: MOV RO,a-(R5) sTEST THE MOV 
CMP R4,(R2) sCORRECT RESULT ? 
BEQ 1$1471 ::;BR IF YES 


MOV (R2),R3 ;GET THE WAS DATA 


SEQ 9177 


J 14 


9591 TeTEST 473 MOVB TEST - SMO,DMO - EXTEND O'S 

9592 Hee eeeeeee eee eee eeeeeteeeeteeeteeeeeereeseeneneeeeeereeteeeenese 
3264 151473: 

3204 000004 SCOPE sCALL THE SCOPE LOOP UTILITY 


| 
COKDA-D KD11-K BASIC L 961 £ TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 179 
COKDAD.P11 11-SEP-79 13:31 1470 MOv SMO,DMS TEST SEQ 0178 | 
9338 033144 104001 3$: ERROR 1 :MOV DELIVERED THE WRONG RESULT | 
9541 
9542 sp eteererrereererererrresererererrereterererereeeeeeeeretaneeeeee | 
9543 :*TEST 471 MOv SMO,DM6 TEST 
9544 ;, t*eeeerererrererrereeererrereerererenerereeeeneeeeeeeneesarenees 
9545 033146 181471: 
9546 033146 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
9547 033150 012700 000471 MOV #471,R0 =:LOAD RO WITH TEST NUMBER 
9548 033154 013701 033176 MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD | 
9549 033160 012702 063316 MOV #MBUF1,R2 :DEST ADDR = MBUF1 
9550 033164 010004 MOV RO,R4 sRESULT S$ / B = TEST NUMBER | 
9551 033166 012705 063312 MOV #MBUFO,RS [BASE DEST ADDR = MBUFO 
9552 033172 005012 CLR (R2) :CDEST] = 000000 
9335 033174 000257 CCC :SCOPE SYNC 
9995 033176 010065 000004 2$: MOV RO,4(R5) :TEST THE MOV 
9557 033202 020412 CMP RG, (R2) :RESULT CORRECT ? 
9998 033204 001402 BEQ T$1472 ::BR IF YES 
9560 033206 011203 MOV (R2),R3 :GET THE WAS DATA 
$76! 033210 104001 3$: ERROR 1 =MOV DELIVERED THE WRONG RESULT 
9563 speeeeeererrereeerererereneererrenterereenanaeeeeeeeeeneseeese eee 
9564 s*TEST 472 MOVB TEST - SMO,DMO - EXTEND 1'S 
9565 sptteeeeerereererrererererieererenttrteaeteneeneneeeeReeeeAe eee 
9566 033212 TS1472: 
9567 033212 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
9568 033214 012700 000472 MOV #472,R0 =:LOAD RO WITH TEST NUMBER 
9569 033220 013701 033242 MOV av2$,R1 =LOAD R1 WITH TEST INSTRUCTION WORD 
9570 033224 012704 177652 MOV #177652,R4 sRESULT S$ / B = 177652 
9571 033230 012705 000252 MOV #252,R5 SOURCE OP = 252 
9572 033234 005003 CLR R3 :CDESTJ = 000000 
9573 033236 000257 CCC =CLEAR FLAGS 
ate 033240 000266 266 =N:C = 0110 | 
9976 033242 110503 28: MOVB R5,R3 :TEST THE MOVB | 
| 
9578 033244 100003 BPL 3$ :N:C = 1000 ? 
9579 033246 001402 BEQ 3$ 
9580 033250 102401 BvS 3$ 
9981 033252 103001 BCC 4$ 
9585 033254 104002 3$: ERROR 2 :MOVB FAILED TO ALTER CODES PROPERLY 
4 
9585 033256 020403 4$: CMP R4,R3 :RESULT CORRECT ? 
9986 033260 001401 BEQ 181473 ::BR IF YES 
9588 033262 104002 5$: ERROR 2 :MOVB DELIVERED THE WRONG RESULT 
oie **@ewmeceeeeeeeretereereeteeteeeeteticanetereeeeeeeneeneeeeaeeeeeteeeee j 
| 
| 
| 
ae 
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033324 
033326 


033330 
033332 


033334 


033336 


033362 
033364 


033366 
033370 


033372 


033424 
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012700 
APA 


000271 
110503 
100403 


103401 
104002 


020403 
001401 


104002 


000004 


000257 
111503 


020403 
001401 


104002 


000473 
033314 


177400 


000474 
033364 


064630 


000475 


177400 


K 14 ies Ae alr 
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MOVB TEST = SMO,DMO - EXTEND 0°S SEQ 0179 | 
MOV #473,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD | 
CLR RG :RESULT S$ / B = 000000 
MOV —s-#177400,R5 SSOURCE OP = 177400 
CLR R3 : (DEST) = 177777 i 
COM R3 
ccc ;CLEAR FLAGS 
271 3N:C = 1001 
2s: MOvB R5,R3 sTEST TRE MOVB 
BM] 3$ 3N:C = 0101 ? 
BNE 3$ 
BvS 3$ 
BCS 4% 
3$: ERROR 2 :MOVB FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 ;RESULT CORRECT ? 
BEQ TS1474 ::BR IF YES 
5$: ERROR 2 ;MOVB DELIVERED THE WRONG RESULT 
speeeeererererererrrrererererrereerretereneAeeeeReneAAeeseneeAees 
s*TEST 474 MOVB TEST - SM1,DM0 - SOURCE ADDR EVEN 
be 6e0600eheseehenee0e'eeedheeeeesseesesoosesoonncseesanespeceanets 
1S1474: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #474,R0 +s LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 =RESULT Ss / B = 900000 
MOV #DBTA,RS ;SOURCE ADDR = DBTA 
CLR R3 : (DESTJ 2 177777 
COM R3 
CCC ;SCOPE SYNC 
2$: MOvVB (R5),R3 sTEST THE MOVB 
CMP R4,R3 sRESULT CORRECT ? 
BEQ 181475 ::BR IF YES 
3$: ERROR 2 ;MOVB DELIVERED THE WRONG RESULT 
sp eeeeerereereererreterrsesaeresereresereneeaeeeeaeeseseeereReeTe 
s*TEST 475 MOVB TEST - SM1,D¥0 - SOURCE ADDR ODD 
sp eeeeerererrerrerrereerererereneereerenentereneneeeeenseeserenes 
181475: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #475,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #125,R4 sRESULT S / B = 125 
MOV #DBTA+3, R5 :SOURCE ADDR = DBTA+3 
MOV #177400,R3 :CDEST] = 177400 
ccc sSCOPE SYNC 
2$: MOVB (R5),R3 sTEST THE MOVB 
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033426 
033450 


033432 


033434 


033460 
033462 


033464 
033466 


033470 


033472 
033476 


033500 


033502 


033526 
033530 


033532 
033534 


033536 


033540 
033544 


033546 
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000004 


000257 
112503 


020403 
001401 


104002 


022705 
001401 


104005 


000004 


012703 
000257 


112503 


020403 
001401 


104002 


022705 
001401 


104005 


4 


000476 


064631 


064632 


000477 
033530 


064630 
177400 


064631 


L 14 
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1475 MOVB TEST - SM1,0M0 - SOURCE ADDR ODD 


CMP RG RS sPESULT CORRECT ? 
BEQ TS1476 :3BR IF YES 
3$: ERROR 2 ;MOVB DELIVERED THE WRONG RESULT 


ps, eeeeerrrrererererrriererererenesereteeeeeneeneteneeeteeeeneeeteee 


s*TEST 476 MOVB TEST = SM2,DMO - SOURCE ADDR ODD 


;, eterertererererererererrerereterereeeeeeeeeeneneeteneeneneneeeee 


181476: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #476,R0 > LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #-1,R4 = RESULT S / B = 177777 
MOV #DBTA+1,R5 ;SOURCE ADDR = DBTA+1 
CLR R3 :(DEST) = 000000 
ccc ;SCOPE SYNC 
2$: MOVB (R5)4,R3 s TEST THE MOVB 
CMP R4,R3 ;RESULT CORRECT ? 
BEQ 4% ;BR IF YES 
3$: ERROR 2 :MOVB DELIVERED THE WRONG RESULT 
4$: CMP #DBTA+2,R5 7D1D MOVB INCREMENT SRC REG ? 
BEQ 181477 3:BR IF YES 
5$: ERROR 5 ;MOVB FAILED TO UPDATE SRC REG 
sj eteeerereeerereerereeeereteteKneteeeeereekeeeteneeeteeeneneeeeene 
s*TEST 477 MOVB TEST - SM2,DMO0 - SOURCE ADDR EVEN 
RHEE eee Keaetkakaetekeeeaneeeeeeeaneeese 
181477: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #477,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 sRESULT S / B= 000000 
MOV #DBTA,RS ;SOURCE ADDR = DBTA 
MOV #177400,R3 :CDESTJ = 177400 
CCC : SCOPE SYNC 
2$: MOVB (R5)+,R3 sTEST THE MOVB 
CMP R4,R3 ;RESULT CORRECT ? 
BEQ 4% :BR IF YES 
3$: ERROR 2 ;MOVB DELIVERED THE WRONG RESULT 
4$: CMP #DBTA+1,R5 ;D1D MOVB INCREMENT SRC REG ? 
BEQ 181500 > BR IF YES 
5$: ERROR 5 :MOVB FAILED 10 UPDATE SOURCE REG 
sl eetereesercerecereteerereeeeereserereseneeeeenereneneeteseneeeee 
s*TEST 500 MOVB TEST - SM‘,DM1 - SRC ADR ODD / DST ADR EVEN 


SEQ 0180 
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033606 


033610 
033612 


033614 


033646 
033650 


033652 
0335654 


033656 
033660 


033662 
033666 
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000257 
111523 
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001402 


011203 
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022703 
001401 


104005 


064631 


000501 
033650 
063312 
000377 
064631 


063313 


000502 
033730 
063312 
000377 
064631 
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500 


1§1500: 


2s: 


3$: 


11-SEP-79 


13:53 PAGE 1 


82 
MOVB TEST - SM1,DM1 - SRC ADR ODD / DST ADR EVEN 


-#ereeterrerrerererererrerererrertererereteteeaeeeneeeeteeeteteeeeeAees 


MOV 
ERROR 


#MBUFO, R2 
#377,R4 
#OBTA+1,R5 
(R2) 


(R5),(R2) 


R4,(R2) 
TS1501 


einen 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

:RESULT S$ / B = "377 


: 00 
:CLEAR FLAGS = SCOPE SYNC 


; TEST THE MOVB 


CORRECT RESULT ? 
:;BR IF YES 


;GET THE WAS DATA 
;MOVB DELIVERED WRONG RESULT 


*s@@eeterrererererererereereererereererereeeeeeeeeteeeteeneeeereeereente 


SeTEST 501 


181501: 


2$: 


3$: 
4$: 


5$: 


ERROR 


MOVB TEST = SM1,DM2 - SRC ADR ODD / DST ADR EVEN 


s,eeeeeeereerereeereereeereeererererteeteeeeeeeeteeteaeeaeeAeeeAee 


#MBUFO,R2 
#377,R4 
#DBTA+1,R5 


(R5),(R3)+* 
R4,(R2) 
4$ 


$82) RS 


TST 
5 


#MBUFO+1,R3 
502 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

:RESULT $ / B = 377 


; DD 
:CLEAR FLAGS = SCOPE SYNC 
; TEST THE MOVB 


:CORRECT RESULT ? 
:BR IF YES 


GET THE WAS DATA 
;MOVB DELIVERED WRONG RESULT 


01D MOVB INCREMENT THE DEST REG ? 
:3BR IF YES 


;MOVB FAILED TO UPDATE DEST REG 


sr eeereererreerrererereererereretrerinereeteereeneeeeeeeeseerereee 


MOVB TEST - SM1,DM3 - SRC ADR ODD / DST ADR EVEN 


>*TEST 502 


‘see eeeeereteteeeeereerereeeeeeeeeereeeeeeeeeeeeeeeeeeeeeeeteeeeee 


181502: 


#MBUFO, R2 
#377, RG 
#DBTA+1,R5 


;CALL THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
:DEST awe A onag FO 

sRESULT S / 377 

:SRC ADDR = DBTA +] 


SEQ 0181 
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034014 
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034020 
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111543 


020302 
001401 


104005 


020412 
001402 


011203 
104001 
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est 
91 


ws 
we 


063310 


000503 


064631 
063313 


000504 


0646351 
063310 


nN 1 


4 
MACY11 30A(1052) 11-SEP-79 13:53 PAGE 183 
1502 MOVB TEST - SM1,0M5 - SRC ADR ODD / DST ADR EVEN SEQ 0182 
CLR (R2) ;COEST] = 000000 
MOV #ATA+10,R5 :BASE DEST ADDR = ATA +10 
ccc ;CLEAR FLAGS - SCOPE SYNC 
2$: MOVB (R5) ,a(R3)* ; TEST THE MOVB 
CMP MATA*12,R3 ;D1D DEST REG GET INCREMENTED ? 
» BEQ 4t ;BR IF YES 
3$: ERROR 5 ;MOVB FAILED TO UPDATE DEST REG 
4$: CMP R4,(R2) ;CORRECT RESULT ? 
BEQ 181503 ::BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;MOVB DELIVERED WRONG RESULT 


ppeteeeeererererreererererreretesereeeerteeteeeeeaeeHeteeeeeKeeeKes 


s*TEST 503 MOVB TEST - SM1,DM4 = SRC ADR ODD / DST ADR EVEN 


PPPTT TOOT TTT TITTTTTTOTTITITITITITITITT TTT LI TTL 


1$1503: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #503,R0 >; LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV anBurO, R2 :DEST ADDR = MBUFO 

MOV #377, sRESULT S / B = 377 

MOV spathet 85 :SRC ADDR = DBTA +1 

CLR (R2) :(DEST] = 000000 

MOV #MBUFO+1,R3 : INITIAL DEST ADDR = MBUFO+1 

ccc > CLEAR FLAGS - SCOPE SYNC 
2$: MOVB (R5),-(R3) sTEST THE MOVB 

CMP R3,R2 :DID MOVB DECREMENT DEST REG ? 

BEQ 4% ;BR IF YES 
3$: ERROR 5 ;MOVB FAILED TO UPDATE DEST REG 
4$: CMP R4,(R2) sCORRECT RESULT ? 

BEQ 181504 3:BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 sMOVB DELIVERED WRONG RESULT 
speeeeererrereerereeererererererreeeeseneneeeeeeeeee eee eee TS 
:*TEST 504 MOVB TEST ~- SM1,DM5 - SRC ADR ODD / DST ADR EVEN 
speeeeererrerrerereeterrrrereterereneereneneeeeKeReee ee eRe AeA ee, 
TST504: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #504,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV wHBUFO, R2 ;DEST ADDR = MBUFO 

MOV #377,R sRESULT S$ / B = 377 

MOV thE :SRC ADDR = DBTA +i 

CLR (R2) :CDESTI = 000000 

MOV MATA*12,R3 s INITIAL DEST ADDR = ATA #12 
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034074 
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034102 
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000257 
111555 


eeeiy> 
001401 


104005 


020412 
001402 


011203 
104001 


111563 


020412 
001402 


011203 
104001 


020412 
001402 
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1 


063506 


000505 


064631 
063320 


177772 


000506 


064631 
063276 


000910 


MACY1) "'oo tii 11-SEP-79 
1504 


23: 


3$: 
4%: 


5$: 


ccc 
*OvB 


CMP 
BEQ 


ERROR 


CMP 
BEQ 


MOV 
ERROR 


TEST = SM1,0M5 - SRe 


(R5) ,a-(R3) 
#ATA*10,R3 
4% 


5 


R4,(R2) 
T$1505 


hie 


53 PAGE 184 
ADR ODD / DST ADR EVEN 


CLEAR FLAGS - SCOPE SYNC 

; TEST THE MOVB 

7010 MOVB DECREMENT DEST REG ? 
IF YES 


;MOVB FAILED TO UPDATE DEST REG 


CORRECT RESULT ? 
:3BR IF YES 


;GET THE WAS DATA 
;MOVB DELIVERED WRONG RESULT 


ppeeeereeerererenerererrererererereeereeaeeeeeeNeeeAAeeTeLETAeEee 


;*TEST 505 


TST505: 


23: 


3$: 


MOV 
ERROR 


MOVB TEST - SM1,DM6 - SRC ADR ODD / DST ADR EVEN 


ppetrerererererrrrrerererereereterereeereeneareeeenesererenneeeTe 


#505,R0 
a#2$,R1 
#MBUFO,R2 
#377 ,R4 
#DBTA+1,R5 
(R2) 
#MBUFO+6,R3 


(R5) ,-6(R3) 


R4,(R2) 
181506 


ease 


CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 


:BASE DEST ADDR = MBUFO+6 
;CLEAR FLAGS - SCOPE SYNC 


; TEST THE MOVB 
; CORRECT RESULT ? 
IF YES 


;GET THE WAS DATA 
;MOVB DELIVERED WRONG RESULT 


pp ereneererererrerrerersreereseretertarereereeeareeeATeeeATA TEAS 


MOVB TEST - SM1,DM7 = SRC ADR ODD / DST ADR EVEN 


s*TEST 506 


2  erereererereecereecececerecencerereereeseeeeeoceseeseceeseereee 


151506: 


2$. 


#MBUFO,R2 
#377,R4 
#DBIA+1,R5 
(R2) 
WATA,RS 


(R5) ,a10(R3) 


R4,(R2) 
181507 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = Ray’ 0 

sRESULT S / 377 

SRC ADDR = DBTA +1 

;CDEST) = 000000 

;BASE DEST ADDR = ATA 

CLEAR FLAGS - SCOPE SYNC 


;TEST THE MOVB 
+ CORRECT RESULT ? 
1F YES 


| 


SEQ 0185 


¢ 15 
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COKDAD.P11 il- ~SEP~79 13:31 1506 MOVB TEST - SM1,0M7 = SRC ADR ODD / DST ADR EVEN SEQ 0184 
9875 034230 011203 MOV (R2),R3 ;GET THE WAS DATA 
b+ th 034232 104001 3$: ERROR 1 sMOVB DELIVERED WRONG RESULT 
9878 p_eewereerererrerecererrererreererererereeterereereeeTeTeeeeeTeTes 
9879 s*TEST 507 MOVB SMO,0M1 TEST 
9880 pp eeeeerererererererereerereeeerereeereteneterereteeeereneererere 
9881 034234 181507: 
9882 034234 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
9883 034236 012700 000507 MOV #507,R0 7;LOAD RO WITH TEST NUMBER 
9884 034242 015701 034270 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
9885 034246 012702 063312 MOV #MBUFO,R2 :DEST ADDR = MBUFO 
9886 034252 012704 000377 MOV #377 ,R4 sRESULT S / B = 377 
9887 034256 012703 177777 MOV #-1,R3 3R3 CONTAINS SOURCE OP 
9888 034262 010205 MOV R2,R5 3R5 CONTAINS DEST ADDR 
9889 034264 005012 CLR (R2) :(DESTJ = 000000 
ys 0 034266 000257 ccc ;SCOPE SYNC 
psa 4 034270 110315 2%: “OvB R2,(R5) ; TEST THE MOVB 
9894 034272 020412 CMP RG, (R2) sRESULT CORRECT ? 
tere 034274 001402 BEQ TS$1510 3;BR IF YES 
9897 034276 011203 MOV (R2),R3 ;GET THE WAS DATA 
Hs 44. 034300 104001 3$: ERROR 1 sMOVB DELIVERED THE WRONG RESULT 
9900 ppereeererrerrererreeeerereererererreeeereeeeetereereneHeneNe TEES 
9901 ;*TEST 510 MOVB SMO,DM2 TEST 
9902 speeeeererereeeteeeeeeterererereerererereeeeteeeeereeeeeTeRetereee 
9903 034302 181510: 
9904 034302 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
9905 034304 012700 000510 MOV #510,R0 7;LOAD RO WITH TEST NUMBER 
9906 034310 013701 034336 MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
9907 034314 012702 063312 MOV #MBUFO, R2 ;DEST ADDR = MBUFO 
9908 034320 012704 000377 MOV #377, RG sRESULT S / B = 377 
9909 034324 012703 177777 MOV #-1,R3 3R3 CONTAINS SOURCE OP 
9910 034330 010205 MOV R2,R5 :R5 CONTAINS DEST ADDR 
9911 034332 005012 CLR (R2) :(DEST) = 000000 
p44 034334 000257 ccc ;SCOPE SYNC 
ay 034336 110325 2s: MOVB R3,(R5)+ sTEST THE MOVB 
9916 034340 020412 CMP R4,(R2) ;RESULT CORRECT ? 
aol 034342 001402 BEQ TS1511 37;BR IF YES 
9919 034344 011203 MOV (R2),R3 ;GET THE WAS DATA 
9920 034346 104001 3$: ERROR 1 ;MOVB DELIVERED THE WRONG RESULT 
po $1 ppeereererererererereerererererereterereereretereeeeeeererere ese 
9923 seTEST 511 MOVB SMO,DM3 TEST 
9924 speererererrrrerererererrererereetererereeeeeeeteneeeeereerese ses 
9925 034350 TST511: 
9926 034350 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

27 034352 012700 000511 MOV #511,R0 +; LOAD RO WITH TEST NUMBER 

9928 034356 013701 034406 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
9929 034362 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
9930 034366 012704 000377 MOV #377,R4 RESULT S$ / B= 37? 








7 MOV #-1,R3 ;SOURCE OP IN R35 

6 MOV WATA*IO,RS :BASE DEST ADDR = ATA+10 
CLR (R2) ;COESTJ = 000000 
ccc :SCOPE SYNC 


9936 034406 110355 23: MOVB R3,a(R5)¢ ;TEST THE MOVB 


9938 034410 020412 CMP R4,(R2) sRESULT CORREC! ? 
9939 034412 001402 BEQ TST512 :;BR IF YES 


d 15 raft ae? 
CQKDA-D KDI1-«K ? S OGIC STS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 186 
CQKDAD.P11 11-SEP-79 18: 1511 MOVB SMO,DM3 TEST SEQ 0185 
9941 034414 011203 MOV (R2),R3 sGET THE WAS DATA 


9983 034534 001402 BEQ TS1514 ;;BR IF YES 


9985 034536 011203 MOV (R2),R3 ;GET THE WAS DATA 
9986 034540 104001 3$: ERROR 1 >MOVB DELIVERED THE WRONG RESULT 


bo 034416 104001 38: ERROR 1 ;MOVB DELIVERED THE WRONG RESULT 
9944 seereereeerereererereerereeeneeereeereeeeeeneeeteeeeeTeneeeeTes 
9945 aTEST 512 MOVB SMO,DM4 TEST 
9946 seeeerereerereerrerereeeereeereetreeteeteeeteeeeeeeTeneteneTeree 
9947 034420 181512: 
9948 034420 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
9949 034422 012700 000512 MOV #512,R0 ;;LOAD RO WITH TEST NUMBER 
9950 034426 015701 934456 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
9951 034432 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
9952 034436 012704 177400 MOV #177400,R4 ;RESULT S / B = 177400 
9953 034442 012703 177777 MOV #-1,R3 383 CONTAINS SOURCE OP 
9954 034446 012705 063314 MOV MMBUFO+2, R5 “BASE DEST ADDR = MBUFO+2 
9955 034452 005012 CLR (R2) :CDESTJ = 000000 
pots 034454 000257 ccc ;SCOPE SYNC 
at | 034456 110345 2s: MOVB R3,-(R5) ; TEST Tht MOVB 
9960 034460 020412 CMP R4,(R2) sRESULT CORRECT ? 
toes 034462 001402 BEQ 181513 ;;BR IF YES 
9963 034464 011203 MOV (R2),R3 ;GET THE WAS DATA 
ane | 034466 104001 3$: ERROR 1 ;MOVB DELIVERED THE WRONG RESULT 
ores pee eeeeeererrereereerrreeeereeeererereeeeeeeeeeeeeeeeeeeeTATe Eee 
9967 seTEST 513 MOVB. SMO,DM6 TEST 
9968 -eeeeeereeeteeeeereeeeeereeeerereteeeeeeeeeReKeReeAeeeeeHeeAeA ee 
9969 034470 181513: 
9970 034470 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
9971 034472 012700 000513 MOV #513,R0 ;;LOAD RO WITH TEST NUMBER 
9972 034476 013701 034526 MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
034502 012762 063312 MOV aMBUFO, R2 ;DEST ADDR = MBUFO 
9974 034506 012704 000377 MOV #377,R ;RESULT S$ / B = 377 
9975 034512 012703 177777 MOV 11.83. :R3 CONTAINS SOURCE OP 
9976 034516 012705 063314 MOV #MBUFO+2,R5 ; BASE DEST ADDR = MBUFO+2 
9977 034522 005012 CLR (R2) :CDEST] = 000000 
ped 034524 000257 ccc :SCOPE SYNC 
oer 034526 110365 177776 2$: MOVB R3,-2(R5) ;TEST THE MOVB 
9982 034532 020412 CMP R4,(R2) sRESUL® CORRECT ? 
| 
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034604 
034606 


034610 
034612 


034614 


034616 
034616 
034620 
034624 


034630 


034652 
034654 
034656 
034660 
034662 
034664 
034666 


034670 
034672 
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000267 
050503 
100003 


103401 
104002 


020403 
001401 


104002 


000004 
012700 
013701 


eaer et 


000270 
050503 
100403 
001002 
102401 
103001 
104002 


020403 
001401 


000515 
034654 


002000 063234 
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MOVB SMO,DM6 TEST 


a ee 


s*7EST 514 


;peeereecerererererererererrererererertereeeeereneneaeereeeeATeese 


TST514: 


23: 


3$: 
4%: 


5$: 


SCOPE 


ERROR 


BIS TEST = SMO,DMO - N:C = 0111 


;CALL THE SCOPE LOOP wae 


#514,R0 7;LOAD RO WITH TEST NUMBE 
a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
#-1,R4 sRESULT S / B = 177777 
#125252,R5 > SR C OPR = 125252 
#52525.R3 sCDEST) = 52525 
sCLEAR FLAGS 
sN:C = 0111 
R5,R35 : TEST THE BIS 
3% sN:C = 1001 ? 
3% 
3$ 
4% 
2 ;BIS FAILED TO ALTER CODES PROPERLY 
R4,R3 s CORRECT RESULT ? 
T$1515 :;BR IF YES 
2 :BIS DELIVERED THE WRONG RESULT 


**@eeeerereetererereteteteteeeeerereeeteeeReeteReteeneeeeeeteeeteeee 


SeTEST 515 


speeearererererertaeerresenereereeeerereteneneNeeaneHeeneeneeeeeTse 


1S1515: 


BIS TEST - SMO,DMO - N:C = 1000 


;CALL THE SCOPE LOOP UTILITY 
#515,R0 ;;LOAD RO WITH TEST NUMBER 
a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 


. SBTTL user CONTROLLED BREAKPOINT -- B1T10 


2$: 


3$: 
4$: 


#B1T10,a#BPTLOC ;BREAKPOINT HALT SET ?? 
+4 ;BR IF NOT 


 BREAK-DEPRESS CONTINUE TO CONTINUE 
R4 sRESULT S / B = 000000 
R5 = SRC OPR = 000000 
R3 ;CDEST] = 000000 
:CLEAR FLAGS 
=N:C = 1000 
R5,R3 ;TEST THE BIS 
3$ 7N:C = 0100 
3$ 
3$ 
4% 
2 :BIS FAILED TO ALTER CODES PROPERLY 
R4,R3 sCORRECT RESUL! ? 
TS1516 > BR IF YES 


SEG 0186 
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034674 


0346/76 


034732 
034734 
034736 
034740 


034742 


034744 
034746 


034750 


034752 
034752 
034754 
034760 
0347064 
034766 
034770 
034772 
034774 


034776 
035000 


035006 


ICL 
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104002 


000267 
040503 
100003 
001402 
102401 
103401 
104002 


020403 
001401 


104002 


000004 
012700 


000270 
040505 
100403 


103001 


oO 
“3 


000517 
034776 
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USER CONTROLLED BREAKPOINT -- BITIO 


5$: ERROR 2 ;BI1S DELIVERED THE WRONG RESULT 
Feb dodo ca aloalataaaaiaad 
:*TEST 516 BIC TEST = SMO,DMO - N:C = O1T1 


sy eteerrreererererererererereerereseeereresenenateneeeeeeseReTe ee 


TST516: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #516,R0 7;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #100000, RG ;RESULT S / B = 100000 

MOV #77777, RS sSRC OPR = 77777 

MOV #-1,R3 :CDEST) = 177777 

ccc ;CLEAR FLAGS 

267 3N:C = 0111 
2$: BIC R5,R3 ; TEST THE BIC 

BPL 3$ zN:C = 1001 ? 

BEQ 3$ 

Bvs 3$ 

BCS 4$ 
3$: ERROR 2 ;BIC FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 ;CORRECT RESULT ? 

BEQ TS1517 3;BR IF YES 
5$: ERROR 2 sBIC DELIVERED THE WRONG RESULT 
ppeteeererererereereseereeeeetereeeterereesaeeereeKeneaeeesAeee ATs 
:*TEST 517 BIC TEST - SMO,DMO - N:C = 1000 


ppereeerererererererereseerereererereseneseeeeesAeeKeeeeRenereeTs 


1$1517: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #517,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
CLR RG ;RESULT S / B = 000000 
CLR R5 :SRC OPR = 000000 
CLR R3 ;CDESTJ = 000000 
ccc CLEAR FLAGS 
SEN 3N:C = 1000 
2$: BIC R5,R3 ; TEST THE BIC 
BM] 3$ 3N:C = 0100 
BNE 3$ 
BvS 3$ 
BCC 4% 


SEQ 0187 


Rint 
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10097 


$3 


WNSORUW  COBNO UR WNHOSRUSRRALCS 


wn—oo 


ee et et et et 


SOSCDOCCOCOCOCOCOCOOOCOOCOCOOCOOCOOCOCOOOCOOCOOCOCOCOCCOCOCO 
ek ee ee ek ed ek ek ok oh eh oe eh ee 


Ww 
ow 


035010 


035012 
035014 


035016 


035020 


035046 
035050 


035052 
035054 


035064 


035066 
035070 


035072 
035074 


SEP-7 


104002 


020403 
001401 


104002 


103401 
104002 


020403 
001402 


011203 
104002 


030503 
100403 


103001 
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13:31 


000520 
035052 
100000 
100000 
100000 


000521 


052525 


MACY11 30A(1052) 


ACY 
1517 
3$: 
4$: 


5$: 


6 
_ 11-SEP-79 


BIC TEST = SMO,DMO - N:C = 1000 


ERROR 


CMP 
BEQ 


ERROR 


S#TEST 520 


1§1520: 


2$: 


3$: 
4$: 


5$: 


MOV 
ERROR 


2 


R4 RS 
T$1520 


2 


#520,R0 
a#2$,R1 
#100000 ,R4 
#100000 ,R5 
#100000 ,R3 


2 


R4,R3 
T$1521 


(R2),R3 
2 


;BIC FAILED TO ALTER CODES PROPERLY 
;CORRECT RESULT ? 
F YES 


15 
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;BIC DELIVERED THE WRONG RESULT 


--@#eeterertererertetrerererererererereereeteneeenenaeteeeeeeeeeeeeete 


BIT TEST - SMO,DMO - N:C = 0111 


;,etererererrerereeerererrerrrerererenereneneneneeeeeeeeeeererteee 


;CALL THE SCOPE LOOP UTILITY 


;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;RESULT S$ / B = 100000 

;SRC OPR = 100000 


;CDEST) = 1 
; CLEAR FLAG 
sN:C = 0111 
; TEST THE B 


3N:C = 1001 


;BIT FAILED TO ALTER CODES PROPERLY 
;CORRECT RESULT ? 


:;BR IF YES 


:GET THE WAS DATA 
;B1T DELIVERED A RESULT 


00000 
$ 


IT 


‘ween eeetereererekteeeeeeeeeeeeeeeeeeeeeeekereeeeeeeeeeetetetetere 


s*TEST 521 


181521: 


2$: 


BIT TEST - SMO,DMO - N:C = 


-*‘@eaeeerereteertereeteeereeeeetetrerereteeeeeeteeteeeeeeeeeeeeteteeeneees 


#521,R0 :;LOAD RO WITH TEST NUMBER 
a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
#125252,R4 RESULT S / B = 125252 
#52525,R5 sSRC OPR = $2525 
R4,R3 sCDESTJ = 125252 
:CLEAR FLAGS 
7N:C = 1000 
R5,R3 sTEST THE BIT 
3$ 3N:C = 0100 
3$ 
3$ 
4$ 


1000 


CALL THE SCOPE LOOP UTILITY 


SEQ 0188 
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035140 


035142 
035144 


035146 


035150 


035176 
035200 
035202 


035210 
035212 


035214 
035216 


035220 


035222 


035250 


035252 
035254 


035262 
035264 
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104002 


020403 
001401 


104002 


000004 


000266 
020503 
100003 
001402 
102401 
103401 
104002 


020403 
001401 


104002 


020503 
100403 


103001 
104002 


000522 
035200 
000001 


000001 


000523 


177777 
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1521 TEST = SMO,DMO - N:C = 1000 


3$: ERROR 2 sBIT FAILED TO ALTER CODES PROPERLY 
4%: CMP RG,R3 ;CORRECT RESULT ? 
BEQ TS1522 > BR IF YES 
5$: ERROR 2 ;BIT DELIVERED A RESULT 
LOO rere eR ee genet eae ag peg Sn na maar ee 
s*TEST 522 CMP TEST = SMO,DMO - N:C = 0110 
pp eertererereerrerrerererrererreeeerereeeteeeeeeneneeneneetererere 
181522: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #522,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #+1,RG [RESULT $/ B= 41 
CLR RS 7SRC OPR = 000000 
MOV #+1,R3 ;CDESTJ] = + 
ccc ;CLEAR FLAGS 
266 3N:C = 0110 
23: CMP R5,R3 sTEST THE CMP 
BPL 3$ 3N:C = 1001 
BEQ 3% 
BvS 3$ 
BCS 4% 
3$: ERROR 2 ;CMP FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,R3 sCORRECT RESULT ? 
BEQ 181523 ;;BR IF YES 
5$: ERROR 2 ;CMP DELIVERED A RESULT 
sie eeeeereerrererreererereeseeeerereresenereeneseeneteeneeeteseee 
s*TEST 523 CMP TEST = SMC,DMO - N:C = 1010 
Sp eeeenereecerrrereerererererereenereresaenetenaeerenenetererenene 
181523: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #523,R0 >;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 e¥ TEST INSTRUCTION WORD 
MOV #-1,R4 sRESULT s/ B = 177777 
MOV #-1,R5 SRC OPR = 177777 
MOV R4,R3 :CDESTJ = “177277 
cor ;CLEAR FLAGS 
272 3N:C = 1010 
2$: CMP R5,R3 sTEST THE CMP 
BM! 3$ iN:C = 0100 
BNE 3$ 
ByS 3$ 
BCC 4% 
3$: ERROR 2 ;CMP FAILED TO ALTER CODES PROPERLY 





SEQ 0189 
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035266 
035270 


035272 


035274 


035316 
035322 


035324 
035326 
035330 
035332 
035334 
035336 


035340 
035342 


035344 


035346 


035402 
035404 
035406 
035410 
035412 
035414 
035416 


035420 
035422 
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020403 
001401 


104002 


000004 


000257 
020503 
100405 
001402 
102001 
103001 
104002 


020403 
001401 


104002 


050512 


100003 
001402 
102401 
103401 


104001 


020412 
001402 
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000524 
035324 
000001 
100000 
000001 


000525 
035404 
063312 
177777 
125252 
052525 


1 
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1523 CMP TEST = SMO,DRO - N: 


4%: CMP RG RS ;CORRECT RESULT ? 
BEQ 181524 ;;BR IF YES 
5$: ERROR 2 sCMP DELIVERED A RESULT 
F ;eteererererererrrrrerererertreeeereetereeeeeeeeaeteeretereneneeee 
Z*TEST 524 CMP TEST - SMO,DMO - N:C = 0000 
*“s@@e@enrnreerereterrerrereerrerererererereeeteneeeeeaerkeetaenaerteeeeteeeeee ee 
181524: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #524,R0 7;LOAD RO WITH TEST NUMBER 
MOV ny ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV sRESULT S / B = #1 
MOV #100000, RS SRC OPR = 1000006 
MOV #+1,R3 :COEST) = 
CCC sCLEAR FLAGS 
2$: CMP R5,R3 s TEST THE CMP 
BMI 3$ 3N:C = 0010 
BEQ 3$ 
BvC 3$ 
BCC 4% 
3$: ERROR 2 ;CMP FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 ; CORRECT RESULT ? 
BEQ 781525 BR IF YES 
5$: ERROR 2 3;CMP DELIVERED A RESULT 


Dn ee ee 


S*TEST 525 BIS TEST - SMO,DM1 - N:C = 0111 


WEARBBBBBBBARBRBREBSRASARSBRARRRRRRRRRRRRRRRE RRR RRRRRRR RRR RR RR RARER ES SD 


181525: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #525,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV aMBUFO, R2 :DEST ADDR = MBUFO 
MOV #-1, RESULT S / B = 177777 
MOV 1125952,85 sSRC OPR = 125252 
MOV #52525, (R2) sCDESTJ] = 52525 
CCC ;CLEAR FLAGS 
267 sN:C = 0111 
es: BIS R5,(R2) sTEST TRE BIS 
BPL 3$ sw:C = 1001 
BEQ 3$ 
Bvs % 
BCS 4% 
3$: ERROR 1 sBIS FAILED TO ALTER CODES PROPERLY 
4$%: CMP R4,(R2) ;CORRECT RESULT ? 
BEQ 181526 > BR 1F YES 


15 
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CQKDAD.P11 11-SEP-79 13:31 1525 BIS TEST = SMO,DM1 =- N:C = 0111 SEQ 0191 
10260 ‘ 

10261 035424 011205 MOV (R2),R3 7GET THE WAS DATA 

Hh +4 035426 104001 5$: ERROR 1 7BI1S DELIVERED THE WRONG RESULT 
10264 ee 
10265 s*TEST 526 BIS TEST = SMO,DM1 - N:C = 1000 

10266 “*@@eeeeteeetererteeeeeereeeeeeerereetereteneteeeeeeaketeeneteneeeeeee 
10267 035430 151526: 

10268 035430 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

10269 035432 012700 000526 MOV #526,R0 LOAD RO WITH TEST NUMBER 

10270 035436 013701 035460 MOV a#2$,R1 sLOAD R1 WITH ae INSTRUCTION WORD 
10271 035442 012702 063312 MOV wMBUFO, R2 :DEST ADDR = MBUFO 

10272 035446 005004 CLR ;RESULT S / B = 060000 

10273 035450 005005 CLR RS :SRC OPR = 000000 

10274 035452 005012 CLR (R2) :(DEST) = 000000 

10275 035454 000257 ccc ;CLEAR FLAGS 

$4 035456 000270 SEN N:C = 1000 

Hd 035460 050512 2$: BIS R5,(R2) :TEST THE BIS 

10280 035462 100403 BM] 3$ iN:C = 0100 

10281 035464 001002 BNE 3$ 

10282 035466 102401 BvS 3$ 

+3344 035470 103001 BCC 4$ 

vases 035472 104001 3$: ERROR 1 :BIS FAILED TO ALTER CODES PROPERLY 
10287 035474 020412 4$: CMP RG, (R2) sCORRECT RESULT ? 

oosas 035476 001402 BEQ 181527 7;BR IF YES 

10290 035500 011203 MOV (R2),R3 ;GET THE WAS DATA 

+4 344 035502 104001 5$: ERROR 1 :BIS DELIVERED THE WRONG RESULT 
10293 sp eewenrenereerererereresersrererrerereenaeeeeneneaeenaseneselety 
10294 s*TEST 527 BIC TEST - SMO,DM1 - N:C = 0111 

10295 spteeereenrereerrerereserereseteeerteneseeeeeeeeeneeeeseeeeTeseee 
10296 035504 1$1527: 

10297 035504 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

10298 035506 012700 000527 MOV #527,R0 :;LOAD RO WITH TEST NUMBER 

10299 035512 013701 035542 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
10300 035516 012702 063312 MOV #MBUFO, R2 ;DEST ADDR = MBUFO 

10301 035522 012704 100000 MOV #100006, RG ;RESULT S / B = 100000 

10302 035526 012705 077777 MOV #77777,R5 :SRC OPR = 77777 

10303 035532 012712 177777 MOV #-1,(R2) ; (DEST) = 177777 

10304 035536 000257 CCC :CLEAR FLAGS 

+ $944 035540 000267 267 0111 

4 od 035542 040512 2$: BIC R5,(R2) sTEST THE BIC 

10309 035544 100003 BPL 3$ 2N:C = 1001 

10310 035546 001402 BEQ 3$ 

10311 035550 102401 Bvs 3$ 

94 te 035552 103401 BCS 4% 

44 be 035554 104001 3$: ERROR 1 sBIC FAILED TO ALTER CODES PROPERLY 
1 
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CQKDAD.P11 11-SEP-79 13:31 1527 BIC TEST - SMO,DM1 - N:C = 0111 SEQ 0192 
10316 035556 020412 4$: CMP R4,(R2) sCORRECT RESULT ? 

oats 035560 001402 BEQ 181530 3 BR IF YES 

10319 035562 011203 MOV (R2) ,R3 ;GET THE WAS DATA 

1Oast 035564 104001 5$: ERROR 1 :BIC DELIVERED THE WRONG RESULT 
10322 ppeeeeerreererrereereerererrrerrreererereeeeneeeeeeeeetenereneTee 
10323 s*TEST 530 BIC TEST - SMO,DM1 - N:C = 1000 

10324 ppteeeeererererereeerererereerererereeeeeneeteeetenerenerenerTTe 
10325 035566 181530: 

10326 035566 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
10327 035570 012700 000530 MOV #530,R0 3;LOAD RO WITH TEST NUMBER 

10328 035574 013701 035616 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
10329 035600 012702 063312 MOV #MBUFO,R2 :DEST ADDR = MBUFO 

10330 035604 005004 CLR RG RESULT S / B = 000000 

10331 035606 005005 CLR R5 7SRC OPR = 000000 

10332 035610 005012 CLR (R2) ;CDESTJ = 000000 

10333 035612 000257 ccc ;CLEAR FLAGS 

tt 9 035614 000270 SEN 3N:C = 1000 

H+ $4 035616 040512 2$: BIC R5,(R2) sTEST THE BIC 

10338 035620 100403 BM] 3$ iN:C = 0100 

10339 035622 001002 BNE 3$ 

10340 035624 102401 Bvs 3$ 

+t a 035626 103001 BCC 4$ 

cores 035630 104001 3$: ERROR 1 :BIC FAILED TO ALTER CODES PROPERLY 
10345 035632 020412 4$: CMP R4,(R2) sCORRECT RESULT ? 

H+ 035634 001402 BEQ 1$1531 > BR IF YES 

10348 035636 011203 MOV (R2),R3 ;GET THE WAS DATA 

+ t$4 035640 104001 5$: ERROR 1 :BI1C DELIVERED THE WRONG RESULT 
tte CRRA eee AeA ATTA eee eee eA eee eee eeeetieteeteeeeeetese 
10352  STEST 531 BIT TEST - SMO,DM1 - N:C = 0111 

10353 Ramee eA ee eee ee eee eee eee eee eee eeeeAeeeteeereeees 
10354 035642 181531: 

10355 035642 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
10356 035644 012700 000531 MOV #531,R0 3;LOAD RO WITH TEST NUMBER 

10357 035650 013701 035700 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
10358 035654 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

10359 035660 012704 100000 MOV #100000, RG RESULT S / B = 100000 

10360 035664 012705 100000 MOV #100000,R5 ;SRC OPR = 100000 

10361 035670 012712 100000 MOV #100000, (R2) : (DEST) = 100000 

10362 035674 000257 ccc CLEAR FLAGS 

+t oes 035676 000267 267 iN:C = 0111 

is 035700 030512 2$: BIT R5,(R2) sTEST THE BIT 

66 

10367 035702 100003 BPL 3$ 3N:C = 1001 

10368 035704 001402 BEQ 3$ 

10369 035706 102401 BvS 3$ 

eee 035710 103401 BCS 4$ 


—— 





CQKDA-D KD11-K BASIC LOGIC TE 
11-SEP-79 13:31 


CQKDAD.P11 


035712 


035714 
035716 


035720 
035722 


035724 


035760 
035762 
035764 


035772 
035774 


035776 
036000 


036002 
036004 


036006 


036042 
036044 
036046 


036054 


104001 


020412 
001402 


011203 
104001 


030512 
100403 


103001 
104001 


020412 
001402 


011203 
104001 


000272 
020512 
100403 


103001 


STS 


000532 


052525 


t 15 

MACY11 30A(1052) 11-SEP-79 13:53 PAGE 194 
1531 BIT TEST = SMO,DM1 - N:C = 0111 
3$: ERROR 1 sBIT FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,(R2) ; CORRECT RESULT ? 

BEQ 781532 7:;BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 sBIT DELIVERED A RESULT 
p,eeererererrerererereererereeeteteeeereneneeteeteaeteneteneeeres 
s*TEST 532 BIT TEST = SMO,DM1 - N:C = 1000 
,, teerererrerrerrrerrerererereserererrereenenerenteneeaeeteeeTese 
181532: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #532,R0 7;LOAD RO WITH TEST NUMBER 

MOV a#2$,81 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #52525,R4 sRESULT S / B = 52525 

MOV #125252,R5 7SRC OPR = 125252 

MOV #52525, (R2) sCDESTJ = 52525 

CCC ;CLEAR FLAGS 

SEN 3N:C = 1000 
2$: BIT R5,(R2) sTEST THE BIT 

BM] 3$ sN:C = 0100 

BNE 3$ 

BvS 3$ 

BCC 4% 
3$: ERROR 1 s;BIT FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) ;CORRECT RESULT ? 

BEQ 181533 3:BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;BIT DELIVERED A RESULT 
spe eeeearererererertererrererereteereeeeeAeeeKeKeAeeeeReeeAAeTeAe 
:*TEST 533 CMP TEST - SMO,DM1 - N:C = 1010 
sp eeeereerererrererereereeereeieteteeereteKeeatanenenetetetetenes 
181533: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #533,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV #-1,R4 sRESULT S / B = -1 

MOV #-1,R5 :SRC OPR = 177777 

MOV #-1,(R2) :CDEST] = 177777 

CCC s;CLEAR FLAGS 

272 3N:C = 1010 
2$: CMP R5,(R2) sTEST THE CMP 

BM] 3$ 3N:C = 0100 

BNE %$ 

BvS 3$ 

BCC 4% 


SEQ i 
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1533 CMP TEST = SMO,DM1 - N:C = 1010 


3$: ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,(R2) ;CORRECT RESULT ? 

BEQ TS1534 BR IF YES 

MOV (R2) R35 ;GET THE WAS DATA 
5$: ERROR 1 ;CMP DELIVERED A RESULT 


py eeeeererererereererrererereereeeeeeneeeeeeeeteeeeeneeneeeeeeese 


s*TEST 534 CMP TEST = SMO,DM1 - N:C = 0110 


py eeteeerererrerertrereererrreeeeererereReeeeKeaeeReeaKeeeeeeeAAeee 


TS1534: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #534,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #+1,R4 :RESULT $ / B = #1 
CLR R5 :SRC OPR = 000000 
MOV #+1,(R2) ;CDESTJ = + 
ccc CLEAR FLAGS 
266 :N:C = 0110 
2$: CMP R5,(R2) ; TEST THE CMP 
BPL 3$ sN:C = 1001 
BEQ 3$ 
BVS 3$ 
BCS 4$ 
3$: ERROR 1 7CMP FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,(R2) sCORRECT RESULT ? 
BEQ TS1555 ::BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 7CMP DELIVERED A RESULT 
PO a th a haat pO at aa i Oral ln tka: tii 
s*TEST 535 CMP TEST = SMO,DM1 - N:C = 0000 


ss eeneerrerereeeeereeeereeeeeereeererereeeeeKeeeeAee eee 


181535: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #535,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION wane 
MOV aMBUF R2 ;DEST ADDR = MBUFO 
MOV #+i, :RESULT $ / B= 41 
MOV #100000 ,R5 SRC OPR = 100000 
MOV #+1,(R2) ;CDEST] = +1 
ccc ;CLEAR FLAGS 
2$: CMP R5,(R2) ; TEST THE CMP 
BM! 3$ 3N:C = 0010 
BEQ 3$ 
BvC 3$ 


SEG 0194 
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CQKDAD.P11 11-SEP-79 13:31 1535 CMP TEST = SMO,DM1 - N:C = 0000 SEQ 0195 
My oe 036214 103001 BCC 4$ 

Ho 5 036216 104001 3$: ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
10488 036220 020412 4$: CMP R4,(R2) ;CORRECT RESULT ? 

+ oe 24 036222 001402 BEQ 181536 ::BR IF YES 

10491 036224 011203 MOV (R2),R3 ;GET THE WAS DATA 

Hb ops 036226 104001 5$: ERROR 1 ;CMP DELIVERED A RESULT 

10494 teeth aint ta eee ume alae gig i aioe tte 
10495 s*TEST 536 BIS TEST - SM1,DMO - N:C = 0111 

10496 pp teeereererererrererrerertrerrerteeereneeeeeeeteeeeeeeereee Tees 
10497 036230 T$1536: 

10498 036230 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

10499 036232 012700 000536 MOV #536,R0 >; LOAD RO WITH TEST NUMBER 

10500 036236 013701 036262 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
10501 036242 012704 177777 MOV #-1,R4 RESULT S$ / B = 177777 

10502 036246 012705 063332 MOV #DWTA+10, R5 7SRC ADDR = DWTA+10 

10503 036252 012703 052525 MOV #52525, R3 :CDEST] = 52525 

10504 036256 000257 ccc i. FLAGS 

944 036260 000267 267 N:C = 0111 

iohee 036262 051503 2$: BIS (R5),R3 sTEST THE BIS 

10509 036264 100003 BPL 3$ 3N:C = 1001 

10510 036266 001402 BEQ 3$ 

10511 036270 102401 BvS 3$ 

Hp 244 036272 103401 BCS 4% 

+44 036274 104002 3$: ERROR 2 ;BIS FAILED TO ALTER CODES PROPERLY 
10516 036276 .020403 4$: CMP R4,R3 sCORRECT RESULT ? 

+ 24 036300 001401 BEQ TS1537 : 3 BR If YES 

wo 036302 104002 5$: ERROR 2 3;BIS DELIVERED THE WRONG RESUL7 
Oe31 ppetererrrreeeerretereererterretete rete tee eRe R eee AeA eRe 
10522 s*TEST 537 BIS TEST - SM1,0M0 - N:C = 1000 

10523 ppeeeeerereeeereeeeeeetee eee eee etree Tee eee TARE eee ARE 
10524 036304 T$1537: 

10525 036304 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

10526 036306 012700 000537 MOV #537,R0 7;LOAD RO WITH TEST NUMBER 

10527 036312 013701 036332 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
10528 036316 005004 CLR R4 sRESULT S / B =000000 

10529 036320 012705 063322 MOV #DWTA,RS = SRC ADDR = DWTA 

10530 036324 005003 CLR R53 :CDEST] = 000000 

10531 036326 000257 ccc 3; CLEA R FLAGS 

+44 036330 000270 SEN 3N:C = 1000 

44 036332 051503 2$: BIS (R5),R3 sTEST THE BIS 

10536 036334 100403 BM] 3$ iN:C = 0100 

10537 036336 001002 BNE 3$ 

10538 036340 102401 BvS 3$ 

10539 036342 103001 BCC 4$ 
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1537 BIS TEST = SM1,0M0 - N:C = 1000 
3$: ERROR 2 BIS FAILED TO ALTER CODES PROPERLY 
4%: CAP RG RS = RESULT ? 
BEQ 181540 ::BR IF YES 
5$: ERROR 2 ;BIS DELIVERED THE WRONG RESULT 


ps, eeererererrrererrrerrrererererererereereeeeeeeaerseseeeeTeLeTee 


s*TEST 540 BIC TEST - SM1,DMO - N:C = O1TT 


1§1540: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #540,R80 37;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #100000 R84 sRESULT S / B = 100000 
MOV #MBUF1,RS ;SRC ADDR = MBUFI 
MOV #-1,R3 ;CDESTI = 177777 
MOV #77777, (RS) sSRC OPR = 77777 
ccc [CLEAR FLAGS 
267 3N:C = O11? 
2$: BIC (R5),R3 7 TEST THE BIC 
BPL 3$ sN:C = 1001 ? 
BEQ 3$ 
BvS 3$ 
BCS 4% 
3$: ERROR 2 sBIC FAILED 70 ALTER CODES PROPERLY 
4%: CMP R4,R3 sCORRECT RESULT ? 
BEQ T8154] 7:;BR IF YES 
5$: ERROR 2 :BIC DELIVERED THE WRONG RESULT 


ppeeeeerrerererererereerrerererererererereneaNaeeeAAEAeHEHEEETEEES 


s*TEST 541 BIC TEST - SM1,DMO0 - N:C = 1000 


sp eeerererererrrereererererereseeeeeereeenaNaeeeeReAneneseTETETeeS 


1$1541: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #541,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
CLR R4 tr tae Ss / B = 000000 
MOV #DWTA,RS C ADDR = DWTA 
CLR R3 PESTS =000000 
ccc sCLEAR FLAGS 
SEN NC = 1000 
23: BIC (R5) R35 : TEST THE BIC 
BM! 3$ 7N:C = 0100 
BNE 3% 
Bvs 3% 
BCC 4% 


ooo) 
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000542 


063324 
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063352 
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3$: 
4%: 


5$: 


11-SEP-79 


BIC TEST = SA1,DRO - 


ERROR 


CMP 
BEQ 


ERROR 


2 


RG RS 
TS1542 


2 


+ i PAGE 198 


1000 
:BIC FAILED TO ALTEP CODES PROPERLY 
+ CORRECT RESULT ? 
If YES 


BIC DELIVERED THE WRONG RESULT 


1 RE eee ae apa oe ge > nt geen eee tae *-+ + nlite at sea emecane 


s*TEST 542 


181542: 


2$: 


3$: 
4%: 


5$: 


SCOPE 


ERROR 


BIT TEST = SM1,DMO - N:C = O111 


BTTTTTTOTTTITITTTTTTTT TITTLE TTT TTL 


#DWTA+2,R5 
R4,RS 


(R5),R3 


2 


R4,R3 
TS$1545 


2 


CALL THE SCOPE LOOP UTILITY 
LOAD RO WITH TEST NUMBER 
{OAD R1 WITH wa INSTRUCTION WORD 
:RESULT $ / B = 100000 
;SRC ADDR = DWIAe2 
:CDESTI = 100000 
[CLEAR FLAGS 
iN: 


= 0111 
sTEST THE BIT 
sN:C = 1001 ? 


;BIT FAILED TO ALTER CODES PROPERLY 


;CORRECT RESULT ? 
::BR IF YES 


:BI11 DELIVERED A RESULT 


sptereerrerrereererrerersererererererereneeteeeneeeTeneereTeLeTes 


BIT TEST - SM1,0M0 - N:C = 1000 


TeTEST 543 


+ @ereeeeeeeeereeeeeeeeeeetetereeeeeeeeeeeeeteeeeeeeeteneteneesese 


181543: 


2$: 


#52525,R4 
#DWTA+10,R5 
R4,R5 


(R5) R53 


:CALL THE SCOPE LOOP UTILITY 

::LOAD RO WITH TEST NUMBER 

sLOAD R1 WITH TEST INSTRUCTION WORD 
sRESULT S / B = 52525 

7SRC ADDR = DWIA+10 

:CDEST) = 52525 

sCLEAR FLAGS 

sN:C = 1000 


TEST THE BIT 
= 0100 


BIT FAILED TO ALTER CODES PROPERLY 


SEQ 0197 


| 


ee 
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1543 BIT TEST = SM1,DMO0 - = 1000 SEQ 0198 
4$: CMP Re RS sCORRECT RESULT ? 

BEQ T$ 544 >:BR IF YES 
5$: ERROR 2 sBIT DELIVERED A RESULT 
ek dead Tae aeons deen oe dee eee” ee ce onan 
s*TEST 544 CMP TEST = SM1,DMO0 - N:C = 0110 
;, eeeteeeerrrrerrerrererrerererererereneereeraneeeeeeeteseteeeteTe 
TS1544: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #544,R0 7;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH bag INSTRUCTION WORD 

MOV #+1 RG sRESULT S / B = 

MOV #DWTA,RS 7SRC ADDR = DvIk 

MOV RGR :(DEST) = 

ccc se nines 

266 = 0110 
23: CMP (R5) ,R3 ;TEST THE CMP 

BPL 3% 7N:C = 1001 

BEQ 3$ 

ByS 3% 

BCS 4% 
3$: ERROR 2 ;CMP FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 :CORRECT RESULT ? 

BEG 781545 3;;BR IF YES 
5$: ERROR 2 7CMP DELIVERED A RESULT 
pp eeerererrrererererererererrereeetrerenteneeeeereeeeeeAeeeeeeete 
s*TEST 545 CMP TEST = SM1,DM0 - N:C = 1010 
si eeerererereererererererererereerererseneanerereraeeneeseseresee 
151545: 

SCOPE 7CALL THE SCOPE LOOP UTILITY 

MOV #545,R0 7;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #-1,R4 sRESULT S / B = 177777 

MOV #DWTA+2, RS :SRC ADDR = DWTA+2 

MOV RG,R3 :CDEST) = 177777 

ccc CLEAR FLAGS 

272 3N:C = 1010 
2$: CMP (R5),R3 sTEST THE CMP 

BM] 3$ 3N:C = 0100 

BNE 3$ 

Bvs 3% 

BCC 4¢ 
3$: ERROR 2 :CMP FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,R3 sCORRECT RESULT ? 

BEQ 1S1546 > BR If YES 
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1545 CAP TEST = SM1,0R0 - N 


5$: ERROR 2 ;CMP DELIVERED A RESULT 


,teererrrerrerrererrereserererrererereeeeeeeeetereeeeeeterereTeee 


SeTEST 546 CMP TEST = SM1,DMO - N:C = 0000 


, eetererererrerrrrerereererererereerrrerereneeeeeereeeeereeTTeee 


181546: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #546,k0 art OAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #+1 RG sRESULT S$ / 8 = 41 
MOV #MBUF IRS SRC ADDR = MBUF! 
MOV #+1,R3 DEST] = + 
MOV #100000, (R5) = SRC OPR = 100000 
ccc sCLEAR FLAGS 
2%: CMP (R5),R3 sTEST THE CMP 
BM] 3% 3N:C = 0010 
BEQ 3% 
Bvc 3% 
BCC 4% 
3$: ERROR 2 ;(MP FAILED TO ALTER CODES PROPERLY 
43%: CMP R4,R3 s CORRECT RESULT ? 
BEQ 181547 3:BR IF YES 
5$: ERROR 2 ;CMP DELIVERED A RESULT 


Co ee eee aa ee ee 


TeTEST 547 BIS SM1,DM1 TEST - N:C = 0111 


-@#@eeeeererereretereteeeteereteteeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeete 


181547: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #547,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #-1,R4 ;RESULT S / B = 1777777 
MOV #DWTA+10,R5 ;SOURCE ADDR = DWTA+10 
MOV #52525, (R2) (DEST = 052525 
ccc ; CLEAR FLAGS 
267 sN:C = 0111 
2$: BIS (R5), (R2) ; TEST THE BIS 
BPL 3$ :N:C = 1001? 
BEQ 3$ 
BVS 3$ 
BCS 4% 
3$: ERROR 1 ;BIS FAILED TO ALTER CODES PROPERLY 
4%: CMP R4,(R2) ;CORRECT RESULT ? 
BEQ 181550 ;;BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 


SEQ 0199 
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CQKDAD.P11 11-SEP-79 13:31 1547 BIS SM1,DM1 TEST - N:C = O111 
the 037112 10491 5$: ERROR 1 :BI1S DELIVERED THE WRONG RESULT 
10766 pp teeeererrererererrerererrrererererererrerererereeeerererererteTe 
10767 :*TEST 550 BIS SM1,DM1 TEST - N:C = 1000 
10768 --@eeeererrrorreeeerrerrererererterererereReeeeeeeeTeretererTees 
10769 037114 1§1550: 
10770 037114 000004 SCOPE ;CALL THE SCOPE tte UTILITY 
10771 037116 012700 000550 MOV #550,R0 :;LOAD RO WITH TEST NUMBER 
10772 037122 013701 037146 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
10773 037126 012702 063312 MOV #MBUFO,R2 [DEST ADDR = MBUFO 
10774 037132 005004 CLR Ru RESULT S / B = 000000 
10775 037134 012705 063322 MOV #OWTA,RS ;SOURCE ADDR = DWTA 
10776 037140 005012 CLR (R2) ;CDESTJ] = 000000 
10777 037142 000257 ccc CLEAR FLAGS 
+ $4 037144 000270 SEN iN:C = 1000 
Hh 037146 051512 2%: BIS (R5),(R2) ; TEST THE BIS 
10782 037150 100403 BM] 3$ iN:C = 0100 ? 
10783 037152 001002 BNE - 3$ 
10784 037154 102401 BvS 3$ 
+ $4.44 037156 103001 BCC 4s 
, + tb 037160 104001 3$: ERROR 1 :BIS FAILED TO ALTER CODES PROPERLY 
10789 037162 020412 4$: CMP R4,(R2) ;CORRECT RESULT ? 
+ tis, 037164 001402 BEQ T$1551 ;;BR IF YES 
10792 037166 0112035 MOV (R2) R35 :GET THE WAS DATA 
4 hd 037170 64001 5$: ERROR 1 ;BIS DELIVERED THE WRONG RESULT 
4 
My ¢ he, Epstein attain tah er ls an 
10796 :*TEST 551 BIC SM1,0M1 TEST - N:C = 0111 
10797 ppeeeeeerereeererereererrereeerertereeeeeeererereReereEAeeE TATE ee 
10798 037172 TS1551: 
10799 037172 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
10800 037174 012700 000551 MOV #551,R0 7;LOAD RO WITH TEST NUMBER 
10801 037200 013701 037234 : MOV a#2$,Rl ;LOAD R1 WITH TEST INSTRUCTION WORD 
10802 037204 012702 063312 MOV #MBUFO,R2 :DEST ADDR = MBUFO 
10803 037210 012704 100000 MOV #100000 ,R4 sRESULT S / B = 100000 
10806 037214 012705 063316 MOV #MBUF1,RS ;SOURCE ADDR = MBUF i 
10805 037220 012715 077777 MOV #77777, (R5) :CSOURCE) = 77777 
10806 037224 012712 177777 MOV #-1,(R2) :CDEST) = 177777 
10807 037230 000257 ccc oe ae FLAGS 
oon 037232 000267 267 0111 
+s 037234 041512 2$: BIC (R5),(R2) sTEST THE BIC 
10812 037236 100003 BPL 3$ N:C = 1001 ? 
10813 037240 001402 BEQ 3$ 
10814 037242 102401 BvS 3% 
athe 037244 103401 BCS 4$ 
6 
10817 037246 104001 3$: ERROR 1 :BIC FAILED TO ALTER CODES PROPERLY 
10818 
10819 037250 020412 4$: CMP RG,(R2) ;CORRECT RESULT ? 
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MOV 


ERROR 
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T$1552 
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C = 0111 


7;BR IF YES 


;GET THE WAS DATA 
;BIC DELIVERED THE WRONG RESULT 


peeeeerrerererrrrrererrrererereeeereteeeeeeeeeeeteeeeteteeteTeTe 


SaTEST 552 


--@eetetrererertererereerertrertertererereeeeteneeteteetenerteteteteeee 


151552: 


2$: 


3$: 
4%: 


5$: 


MOV 
ERROR 


s*TEST 553 


181553: 


2s: 


BIC SM1,0M1 TEST - N:C = 


sMBUFO, »R2 
#MBUFT,RS 


(R5) 
(R2) 


(R5),(R2) 


R4,(R2) 
181553 


anne 


= 1000 


;CALL THE SCOPE LOOP UTILITY 

:;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

:RESULT S$ / B = 000000 


“CLEAR FLAGS 
N:C = 1000 


; TEST THE BIC 
= 0100 ? 


;BIC FAILED TO ALTER CODES PROPERLY 


sCORRECT RESULT ? 
3;BR IF YES 


;GET THE WAS DATA 
;BIC DELIVERED THE WRONG RESULT 


*-@@entererererrrtrrreteereerereereeeeteteeteeeeteeeeenteteteteteteneene 


BIT SM1,DM1 TEST - N:C = 1000 


Ss, eeererereererererrreresrereeesereseseeeareaesaneaeeeeeeseseneee 


#MBUFO,R2 


#125252,R4 


#125252, (R2) 


(R5),(R2) 


sCALL THE SCOPE LOOP UTILITY 

>;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

sRESULT S / B = 125252 

; SOURCE ADDR = MBUFI 

;CSOURCEJ] = 052525 

:(DEST] = 125252 

CLEAR FLAGS 

2N:C = 1000 


TEST THE BIT 
= 0100 ? 


SEQ 0201 
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MACY11 S0A(1052) 11-SEP-79 13:53 PAGE 203 
1553 BIT SM1,0M1 TEST - N:C = 1000 
3$: ERROR 1 BIT FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) CORRECT RESULT ? 

BEQ TS1554 ::BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;BIT DELIVERED A RESULT 


Renae tele ee eee cee oak meet eae a ee 
TeTEST 554 BIT SM1,0M1 TEST = N:C = 0111 
s,eeeeererererererererererererererereeeeeeeenetereeerereneeeeTene 
TS1554: 

SCOPE er THE SCOPE LOOP UTILITY 

MOV #554,R0 LOAD RO WITH TEST NUMBER 

MOV a#2$,R! OAD R1 WITH TEST INSTRUCTION WORD 
.SBTTL wt CONTROLLED BREAKPOINT -- BIT11 


#B1T11,a#@BPTLOC ;BREAKPOINT HALT SET ?? 
BEQ .*4 ;BR IF NOT 
HALT ;BREAK-DEPRESS CONTINUE TO CONTINUE 
MOV #MBUFO,R2 ;DEST ADDR = MBUFO 
MOV #100000 ,R4 RESULT S / B = 100000 
MOV #MBUFT,RS ;SOURCE ADDR = MBUFI 
MOV #100000,(R5) ;CSOURCEJ = 100000 
MOV #100000,(R2) ;CDESTJ = 100000 
CCC :CLEAR FLAGS 
267 sN:C = 0111 
2%: BIT (R5),(R2) :TEST THE BIT 
BPL 3$ 3N:C = 1001 ? 
BEQ 3$ 
Bvs 3$ 
BCS 4% 
38: ERROR 1 sBIT FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) sCORRECT RESULT ? 
BEQ 781555 7;BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 sB81T DELIVERED A RESULT 


S,eeererereereserererereereresaeserereserenenereeeeeeeseneeteesetse 
Z*TEST 555 CMP SM1,DM1 TEST - N:C = 1C19 
si eeererererersererererereesereereresrerererereneterarereseeenetse 
T$1555: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #555,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 


MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

MOV #-1,R4 :RESULT $ / B = 177777 
MOV #MBUF1,RS ;SOURCE ADDR = MBUF 1 
MOV #1, (R5) sCSOURCE] = 177777 

MOV RG, (R2) sCDEST] = 177777 

ccC CLEAR FLAGS 


SEQ 0202 | 
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CQKDA-D KDI1-K BASIC oe! 1¢ TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 204 
CQKDAD.P11 11-SEP-79 13:31 1555 CMP SM1,DM1 TEST - N:C = 1010 SEQ 0203 
bat 037564 000272 272 :N:C = 1010 

Hy at 037566 021512 2s: CMP (R5),(R2) TEST THE CMP 

10936 037570 100403 BMi 3$ = 0100 ? 

10937 037572 001002 BNE 3$ 

10938 037574 102401 Bvs 3$ 

baby 037576 103001 BCC 4% 

H+ sa 037600 104001 «3S: ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
10943 037602 020412 4$: CMP R4,(R2) s CORRECT RESULT ? 

YF by 037604 001402 BEQ TS1556 ;;BR IF YES 

10946 037606 011203 MOV (R2),R3 ;GET THE WAS DATA 

+ aay! 037610 104001 5$: ERROR 1 ;CMP DELIVERED A RESULT 

10949 peeeeererererererrerrerrrerereererteeeeeeeeeeeeeeeeteeeereTTe eee 
10950 SeTEST 556 (MP SM1,DM1 TEST - N:C = 0110 

10951 TTTTITITIIITIST ILI TTT 
10952 037612 TS1556: 

10953 037612 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

10954 037614 012700 000556 MOV #556,R0 7:;LOAD RO WITH TEST NUMBER 

10955 037620 013701 037652 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
10956 037624 012702 063312 MOV #MSUFO,R2 ;DEST ADDR = MB 

10957 037630 012704 000001 MOV #+1,R4 ;RESULT S / B = 000001 

10958 037634 012705 063316 MOV #MBUF 1 RS ;SOURCE ADDR = MBUFI 

10959 037640 005015 CLR (R5) ;CSOURCE) = 000000 

10960 037642 012712 000001 MOV #+1,(R2) :CDEST] = 000001 

10961 037646 000257 ccc :CLEAR FLAGS 

ne 037650 000266 266 :€ = 0110 

taees 037652 021512 23: CMP (R5),(R2) ; TEST THE CMP 

10966 037654 100003 BPL 3$ 3N:C = 1001 ? 

10967 037656 001402 BEQ 3$ 

10968 037660 102401 BVS 3$ 

po 44 037662 103401 BCS 4% 

py ot 037664 104001 3$: ERROR 1 :CMP FAILED TO ALTER CODES PROPERLY 
10973 037666 020412 4$: CMP R4,(R2) ;CORRECT RESULT ? 

ne 037670 001402 BEQ TS1557 ::BR IF YES 

10976 037672 011203 MOV (R2),R3 GET THE WAS DATA 

y a4 037674 104001 5$: ERROR 1 ;CMP DELIVERED A RESULT 

10979 ppeeeeerrerreerenererrereerrettereterenrerereteeeeetensereTereeesS 
10980 :*TEST 557 CMP SM1,DM1 TEST - N:C = 0000 

10981 ppeeeeeereeterrererereerererereererereeeerereneereneereneeeeee eee 
10982 037676 181557: 

10983 037676 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

10984 037700 012700 000557 MOV #557,R0 7;LOAD RO WITH TEST NUMBER 

10985 037704 013701 037736 MOV a#2$,R! ;LOAD R1 WITH TEST INSTRUCTION WORD 
10986 037710 012702 063312 MOV anButO, R2 ;DEST ADDER = MBUFO 

10987 037714 012704 000001 MOV wel, sRESULT S / B = 000001 


oe + ee ee Ce Ce. ee + --  e ————  eeeeeee a) 


————— 
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037754 


037756 
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037762 
037762 
037764 
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040000 
040004 
040006 


040010 


040012 
040014 


040016 


040020 


040046 
040050 


040052 


040054 
040056 
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012705 


000257 
021512 
100403 


103001 
104001 


020412 
001402 


011203 
104001 


000004 


000257 
151503 


020403 
001401 


104002 


020412 
001402 


000560 
040010 
000377 
064631 


000561 
040052 
063312 
000377 
064631 
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MACY11 30A(1052) 11-SEP-79 13:53 PAGE 205 
1557 CMP SMI1,DM1 TEST - N:C = 0000 

MOV #MBUFI,RS sSOURCE ADDR = MBUFI 

MOV #100000,(R5)  :CSOURCEJ = 000000 

MOV #+1,(R2) : (DEST) = 000001 

ccc sCLEAR FLAGS 
23: CMP (R5), (R2) sTEST THE CMP 

BM 3$ zN:C = 0010 ? 

BEQ 3$ 

BvC 3% 

BCC 4% 
38: ERROR 1 ;CMP FAILED TO ALTER CODES PROPERLY 
4$: CMP R4,(R2) sCORRECT RESULT ? 

BEQ 781560 7:BR IF YES 

MOV (R2),R3 ;GET THE WAS DATA 
5$: ERROR 1 ;CMP DELIVERED A RESULT 
sp eeeerrerrrrrrrerrerereeereererereceneerenereeeseeaeatereeesereTe 
s*TEST 560 BISB SM1,DMO0 TEST = SOURCE ADDR ODD 
speteneerererererererererterererereerereeneeeenaAaeeAeeeeee TELLS 
TS1560: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #560,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #377,R4 sRESULT S / B = 377 

MOV #DBTA+1,R5 :SOURCE ADDR = DBTA+1 

CLR R3 :CDEST] = 000000 

ccc s;SCOPE SYNC 
23: BISB (R5),R3 sTEST THE B1SB 

CMP R4,R3 sRESULT CORRECT ? 

BEQ T8156] ::BR IF YES 
3$: ERROR 2 :BISB DELIVERED THE WRONG RESULT 
pl eeeerererererererererererrsreerereseeeeseeneneenesereeeeseselTse 
:*TEST 561 BISB SM1,0M1 TEST - SOURCE ADDR ODD 
sp eeeerrererererererserererrerereserereeneereeseneeeeeeneee Tes eTe 
1S1561: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #561,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV #377,R4 sRESULT S / B = 377 

MOV #DBTA+1,R5 sSOURCE ADDR = CBTA+1 

CLR (R2) :CDEST) = 000000 

CCC ;SCOPE SYNC 
2s: B1SB (R5),(R2) sTEST THE BISB 

CMP R4,(R2) ;CORRECT RESULT 

BEQ 181562 ;;BR IF YES 
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CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 15:53 PAGE 206 
CQKDAD.P11 11-SEP-79 13:31 1561 BISB SM1,DM1 TEST - SOURCE ADDR ODD SEQ@ 0205 
11044 

11045 040060 011205 MOV (R2),R3 ;GET THE WAS DATA 

4 ng 040062 104001 3$: ERROR 1 ;BiSB DELIVERED THE WRONG RESULT 

11048 ppeeeeerrererererreerereererrererrererereeeeeeeTeTerereeererereTe 

11049 s*TEST 562 BISB SM1,DM2 TEST - SOURCE ADDR ODD 

11056 ppeeeeeeereererrerreeeereeerereerereererereteeneeeererseeeeTetes 

11051 040064 TST562: 

11052 040064 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

11053 040066 012700 000562 MOV #562 ,R0 7;LOAD RO WITH TEST NUMBER 

11054 040072 013701 040120 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11055 040076 012702 0633i2 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

11056 040102 012704 000377 MOV #377,R4 sRESULT S / B = 377 

11057 040106 012705 064631 MOV #DBTA+1,R5 :SOURCE ADDR = DBTA+1 

11058 040112 005012 CLR (R2) ;C(DESTJ = 000000 

11059 040114 010203 MOV R2,R3 ;DEST ADDR IN R3 

iaet 040116 000257 ccc ;SCOPE SYNC 

HH os 040120 1515235 2$: BISB (R5),(R3)¢ ; TEST THE B1SB 

11064 040122 020412 CMP R4,(R2) ; CORRECT RESULT 

tees 040124 001402 BEQ 1S1563 ;2BR IF YES 

11067 040126 011203 MOV (R2) ,R3 :GET THE WAS DATA 

bees 040130 104001 3$: ERROR 1 7BISB DELIVERED THE WRONG RESULT 

11070 pptteeeerrererererrerrererererererererererererereeeeeneTeeeTeTE Te 

11071 s*TEST 563 BISB SM1,DM35 TEST - SOURCE ADDR ODD 

11072 ppeteeerereeeerrereereerererrereeerereereeeeteeeeereeeereeeeeeTe 

11073 040132 1$1563: 

11074 040132 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

11075 040134 012700 000563 MOV #563,R0 ;;LOAD RO WITH TEST NUMBER 

11076 040140 013701 040170 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11077 040144 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO a 

11078 040150 012704 000377 MOV #377,R4 :RESULT $ / B = 377 > 

11079 040154 012705 064631 MOV #OBTA+1,R5 ;SOURCE ADDR = DBTA+1 

11080 040160 005012 CLR (R2) :CDESTJ = 000000 

11081 040162 012703 063306 MOV #ATA*10,R3 [BASE DEST ADDR = ATA+10 

one 040166 000257 ccc . SCOPE SYNC 

bea: 040170 151533 2$: BISB (R5) ,a(R3)+ ; TEST THE BISB ‘ts 

11086 040172 020412 CMP R4,(R2) ;CORRECT RESULT oe kee 

Ho 040174 001402 BEQ TS1564 7;BR IF YES Pee oe . 

11089 040176 011203 MOV (R2).R3 :GET THE WAS DATA oS” | oy a 
11090 040200 104001 3$: ERROR :BISB DELIVERED THE WRONG RE uLt ie 
Pe a4 :  encevesenenseeoseoseosseornressessororoesegeneeneeebenseunteen 

11093 T#TEST 564 BISB SM1,0M4 TEST - SOURCE ADDR ODD 

11094 WETTTITIIILILII LLL . 
11095 040202 151564: : 
11096 040202 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

11097 040204 012700 000564 MOV #564 ,RO 7;LOAD RO WITH TEST NUMBER 

11098 040210 013701 040240 MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
11099 040214 012702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 


040314 001402 BEQ TS1566 ;2BR 1 


040316 011203 MOV (R2) ,R3 ;GET THE WAS DATA 
040320 104001 3$: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 
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COKDA-D KDI1-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 207 . 2 
CQKDAD.P11 11-SEP-79 13:31 1564 @1SB SM1,DM4 TEST = SOURCE ADDR ODD s , P SEQ 0206 

040220 012704 177400 MOV #177400.R4 :RESULT $ / B = 177400 
040224 012705 064631 MOV #DBTA+1 RS [SOURCE ADDR = DBTA+1 
040230 012703 063314 MOV #MBUFO+2,R3 [BASE DEST ADDR = MBUFO+2> 
040234 005012 CLR (R2) “CDEST] = 000000 P 
040236 000257 CCC “SCOPE SYNC 5 
040240 151543 28: BISB. (RS), =(R3) ;TEST THE BISB og 
040242 020412 CMP RG, (R2) SCORRECT RESULT “= 
040244 001402 BEQ 1$1565 BR IF YES 2 : 
040246 011203 OV (R2),R3 GET THE WAS DATA 
040250 104001 3$: ERROR 1 “BISB DELIVERED THE WRONG RESULT 

sp ettererererereereerererrerererereertereneereeneneatAseneeeAeeeeee 

TeTEST 565 BISB SM1,DMS TEST - SOURCE ADDR ODD 

sc eeeeeerererrerereserereererererererteeeeeneneneneneeeneenaeTete 
040252 181565: 
040252 000004 SCOPE SCALL THE SCOPE LOOP UTILITY 
040254 012700 000565 MOV #565,R0 LOAD RO WiTH TEST NUMBER 
040260 013701 040310 MOV an2$_R1 [LOAD R1 wITH TEST INSTRUCTION WORD 
040264 012702 063312 MOV #MBUFO,R2 DEST ADDR = MBUFO 
040270 012704 000377 MOV #377, RG “RESULT S$ / 8 = 377 
040274 012705 064631 MOV #DBTA+1,R5 :SOURCE ADDR = DBTA+1 

063310 MOV MATA+12,R3 :BASE DEST ADDR = ATA+12 

040304 005012 CLR (R2) (DEST) = 000000 
040306 000257 CCC “SCOPE SYNC 
040310 151553 28: BISB (RS) ,a=(R3) TEST THE BISB 


**@eaee  eeeeetereteeeetaereeeeteeteeeeeeereereeeeeeeeeeeeeereteteetetene 


s*TEST 566 BISB SM1,DM6 TEST - SOURCE ADDR ODD 
s_tteeerereerrererserreeererereneerereeeeeeAeeeKeeeeeeeeeseeeeeeeS 
040322 TS1566: 

00004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

2700 000566 MOV #566,R0 ;;LOAD RO WITH TEST NUMBER 

701 040360 MOV a#2$,Rl ;LOAD R1 WITH TEST INSTRUCTION WORD 
702 063312 MOV #MBUFO,R2 ;DEST ADDR = MBUFO 

704 000377 MOV #377,R4 ;RESULT S / B = 377 

705 064631 MOV #DBTA+1,R5 ;SOURCE ADDR = DBTA+1 

703 063320 MOV #MBUFO+6,R3 ;BASE DEST ADDR = MBUFO+6 

040354 005012 CLR (R2) ;CDEST] = 000000 

040356 000257 CCC ;SCOPE SYNC 


040360 151563 177772 2$: BI1SB (R5) ,-6(R3) TEST THE BISB 


040364 020412 CMP R4,(R2) ;CORRECT RESULT 
040366 001402 BEQ 181567 7:BR IF YES 


040370 011203 MOV (R2),R3 ;GET THE WAS DATA 
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705 064631 
2703 063276 


040432 151573 000010 


040436 020412 
040440 001402 


040442 011203 
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040446 

040446 000004 

040450 012700 000570 
040454 013701 040476 
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040464 012704 000377 


040474 000257 


040476 150423 


040500 020412 
040502 001402 


040504 011203 
040506 104001 
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SSRALSSSSLESRASS 


so 


040510 
2700 000571 
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NMP wren — 


00 

01 
07 040516 013701 040546 
08 040522 012702 063312 
09 040526 012704 177400 
10 040532 012705 000377 
11 040536 012703 063313 
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38: ERROR 1 ;BISB DELIVERED THE WRONG RESULT 


;,eeererererrrrerrererrererreererereerereeeeneeereneeneeeeeeeeeee 


*TEST 567 BISB SM1,0M7 TEST = SOURCE ADDR ODD 
ppteeeeererereereeeereerereeeeeererererereeeeererererereereeeeere 
TS1567: 

SCOPE :CALL THE SCOPE LOOP UTILITY 


;;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;DEST ADDR = MBUFO 

RESULT S / B = 377 

SOURCE ADDR = DBTA+! 

;BASE DEST ADDR = ATA 


MOV #OBTA+1,R5 
MOV MATA,RS 


CLR (R2) :C(DEST] = 000000 
ccc sSCOPE SYNC 
2s: B1SB (R5),a10(R3) :1€ST THE BISB 
CMP R4,(R2) s CORRECT RESULT 
BEQ 781570 3:BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
3$: ERROR 1 sBISB DELIVERED THE WRONG RESULT 


Py ereteerrrerrarcererererrenerererererereterereneeeeneneteteneeertes 


s*TEST 570 BISB SMO,DM2 TEST = DEST ADDR EVEN 
se teeereeerrerererereresrererererererereeereeesenenaeeeeereeseTee 
181570: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 
7;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRICTION WORD 
;DEST ADDR = MBUFO 


MOV #377 ,R4 sRESULT S / B = 377 


MOV R2,R3 ;DEST ADDR IN R3 
CLR (R2) ;CDESTJ = 000000 
ccc sSCOPE SYNC 
28: B1SB8 R4,(R3)¢ : TEST THE BISB 
CMP R4,(R2) s CORRECT RESULT 
BEQ TS1571 ‘;:;BR IF YES 
MOV (R2),R3 ;GET THE WAS DATA 
3$: ERROR 1 :BISB DELIVERED THE WRONG RESULT 


si ererererereererererereervererererereresererenererenareseseneeete 


s*TEST 571 BISB SMO,DM1 TEST - DEST ADDR ODD 
sp eerteeerererereeereesererereseseeeeeeeeeeeenerseeteeeeeseeseeeee 
TSTS71: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #571,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #MBUFO,R2 :DEST ADDR = MBUFO 
MOV #177400,R4 ;RESULT S / B = 177400 
#377,R5 sCRSJ=SOURCE OPR = 377 
MOV #MBUFO+1,R3 ;0DD DEST ADDR IN R35 


ee 


SEQ 0207 


(08-0 ED)" BASIC 


(open .?" 

1272 Q0Se2 
1273S) OeOSee 
Me 

27S) Oe0See 
tT1i2?% 

T'21? 960550 
11278 060552 
1279 

1220 0605S 
1221 060550 
39 22 

"12238 

226 

T1225 

1226 060560 
11227? 060560 
"1228 040562 
1229 4060566 
11230) «060572 
1123) 660576 
112382 060602 
112338 040606 
"123% «4060606 
11235 

1123e@ 040010 
11237 

11238 040012 
"1239 0606014 
11260 

11261 060616 
"1242 040620 
13263 

11266 

112465 

11 

11267 060622 
11248 060622 
11269 040626 
11250 040650 
11251 060034 
11252 040660 
11253 040066 
11254 040650 
1255 0400546 
11256 040656 
11257 

11258 040060 
11259 

11200 040662 
11261 040064 
11262 

11263 040666 
‘206 040670 
1 20¢ 

")2e’ 


11 -SE 


005012 
000257 


011203 
106001 


191513 


020412 
001402 


011203 
104001 
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1571 BISB SRO,DM1 TEST - DEST ADDR ODD SEQ 0208 

CLR (R2) (DEST = 900000 

cic :SCOPE SYN 
28: BISB RS, (R3) TEST THE B1SB 

CMP RG, (R2) CORRECT RESULT 

BEQ 1$1572 T:BR IF YES 

mov (R2) 3 ;GET THE WAS DATA 
38: ERROR 1 :B1SB DELIVERED THE WRONG RESULT 
pp eeeeeererererrrrerrrerrererererererreeKeerereKtteeKereeerereeee 

*TEST 572 BISB SMO.DM1 TEST - DEST ADDR EVEN 
-eeereeeeerererrererrerterrrererrerererterererrererererererererereeere 

1§1572: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #572.R0 ;;LOAD RO WITH TEST NUMBER 

MOV = #281 [LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 :DEST ADDR = MBUFO 

MOV #377,R4 ZRESULT S / B = 377 

MOV R2,R3 [DEST ADDR IN R3 

CLR (R2) :CDEST] = 000000 

CCC SCOPE SYNC 
2s: BISB = R4, (R3) ;TEST THE BISB 

CMP R4, (R2) CORRECT RESULT 

BEQ 1S1573 :;BR IF YES 

mov (R2) .R3 ;GET THE WAS DATA 
38: ERROR 1 :BISB DELIVERED THE WRONG RESUL i 
pp eeeereeererererrrrererereerrreeererereneeeneneneeeeKeeeeeeeeeee 
*TEST 573 BISB SM1,DM1 TEST - DEST ADDR ODD 
Pp eeeeeeererrrreerrrerrerrerereerererererAeeKeeKereeereeerereTene 
151573: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #573,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$.R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #MBUFO,R2 DEST ADDR = MBUFO 

Mov #177400 ,R4 RESULT S$ / B = 177400 

MOV #DBTA+1,R5 ;SOURCE ADDR = DBTA+1 

MOV #MBUFO+1,R3 ODD DEST ADDR iN R3 

CLR (R2) :CDEST] = 000000 

CCC SCOPE SYNC 
28: BISB. (RS), (R3) TEST THE BISB 

CMP R4, (R2) ;CORRECT RESULT 

BEQ TST574 ;BR IF YES 

MOV (R2) .R3 ;GET THE WAS DATA 
38: ERROR 1 :BISB DELIVERED THE WRONG RESULT 
sl eeeeecececererererererererereseesereresesenrereneereneneesaleTse 
eTEST 574 JMP MODE 1 TEST, FLAGS = 1111 


eae a + 


(OEDA-D ED11-K BAS 


COEDAD.P1) 


11268 
11269 
11270 


11306 


At tt tt oh Oh oh oh At hk 
tt tt tt hh oh kt hk 
Rese ssesss=sss 
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ee ee ee ee 
OO@-0 LFuN—O 


~ 
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w 
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041016 


Mme 
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ie 
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000575 
040752 
040760 


060576 
041012 
041020 
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1574 JMP MODE 1 TEST, FLAGS = 1111 


s eterererererrrerererererrrrrererererrererereererererereeerereee 


TST574: 
SCOPE 7CALL THE SCOPE LOOP UTILITY 
MOV #574,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #4$,R2 sR2 CONTAINS JUMP ADDRESS 
scc sMAKE N:C = 1111 
23: JMP (R2) :TEST THE JMP - GO TO 4$ 
3$: ERROR 6 3 JMP FAILED TO LOAD PC 
BR 181575 3:G0 CALL SCOPE 
4$: BCC 5$ 7BR IF JMP CLEARED ‘'C’’ 
BvC 5$ :BR IF JMP CLEARED ‘‘v"’ 
BNE 5$ sBR IF JMP CLEARED ‘‘7"* 
BA! 181575 7:BR IF “W'’ STILL SET 
5$: ERROR 6 ;JMP ALTERED CODES - CLEARED ONE 


(teenie ea 8 ga gaint ag nerd emp i RI lh tg 


S*TEST 575 JMP MODE 1 TEST, FLAGS = 0000 


pp rreererererererererererererrrereeerereeeeererererenesarerserese 


TS1575: 


SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #575,R0 > LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #4$,R2 sR2 CONTAINS JMP ADDRESS 
ccc MAKE N:C = 0000 
23: JMP (R2) :TEST THE JMP - GO TO 4$ 
3$: ERROR 6 7 JMP FAILED TO LOAD PC 
BR 781576 3:G0 CALL SCOPE 
4$: BCS 5$ :BR IF JMP SET “'C’’ 
BvS 5$ :BR IF JMP SET ‘'v"" 
BEQ 5$ :BR IF JMP SET “‘Z"* 
BPL TS1576 ::BR IF “'N’’ STILL CLEAR 
5$: ERROR 6 7 JMP ALTERED CODES - SET ONE 
sl errrereeerereeererereeererererererererenereterenaserenenereeees 
s*TEST 576 JMP MODE 2 TEST; FLAGS = 1111 


sperervererrererererreerereerrererererrereneeeneeeenseneneeeenetes 


1$1576: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #576,R0 >;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #4$,R2 :R2 CONTAINS JUMP ADDRESS 
scc sSET N:C = 1111 
23: JMP (R2)+ :TEST THE JMP = G6O TO 48% 
3$: ERROR 6 7 JMP FAILED TO LOAD PC 
BR 181577 3:60 TO SCOPE EXIT 


SS SNEED 
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COKDAD.P11 11-SEP-79 13:31 1576 «SMP «MODE 2 TEST: FLAGS = 1111 SEQ 0210 
11324 
11325 041020 103003 - 4S: BCC 5$ BR IF JMP CLEARED “‘C"" 
11326 041022 102002 BvC 5$ ‘BR IF JMP CLEARED “‘v"" 
327 041024 001001 BNE cs BR IF JMP CLEARED “‘Z"" 
041026 100401 BMI 6$ BR IF “NW STILL SET 
041032 022702 041022 6s: CMP #4$+2,R2 DID R2 GET AUTO-INCREMENTED? 
041036 001401 BEQ TSIS77 [BR IF YES 

pp ereeererrererererererereerereererrerererererererereneeereeTTeTe 

TEST 577 JMP MODE 2 TEST; FLAGS = 0000 


SRIF AFUNLSS& 


041030 104006 5$: ERROR 6 7 JMP ALTERED CODES - CLEARED 

041040 104006 7$: ERROR 6 ;JMP FAILED TO UPDATE REGISTER (R2) 
ppetereererrereerereeeerereecreerererererereerrerereenterererrere 

041042 TST577: 

041042 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

041044 012700 000577 MOV #577,R0 3:LOAD RO WITH TEST NUMBER 

041062 MOV a#2$,R1 7LOAD R1 WITH TEST INSTRUCTION WORD 


041054 012702 041070 MOV #4$,R2 ;R2 CONTAINS JUMP ADDRESS 
041060 000257 ccc ;MAKE N:C = 0000 


041062 000122 2$: JMP (R2)+ TEST THE JMP - GO TO 4$ 
041064 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 


FFESEFE 
OuFrWN—Oo 
® 
= 
3 
= 
3 


ESF 


041100 104006 5$: ERROR 6 ;JMP ALTERED CODES - SET 


ONO VESWN—O0OON 
z 
io) 
~“ 
fo) 


; 041066 000405 BR TST600 3;G0 TO SCOPE EXIT 

5 103403 4$: BCS 5$ BR IF JMP SET ‘“C"’ 
53 041072 102402 BVS 5$ ;BR IF JMP SET ‘‘v"" 
54 041074 001401 BEQ 5$ 7BR IF JMP SET “'2"' 
; 041076 100001 BPL TST600 7:BR IF “'N'' IS CLEAR 
5 

5 


WAAAMAAWAw 


59 sr eeeererrereereecereerererererererereerenrareenerarereseneeeeeelse 
360 SSTEST 600 JMP TEST MODE 3: FLAGS = 1111 

361 pp eererrerererserererrereerereereerereereraraneeeneneeeeeeeeeTeNe 

362 041102 1§1600: 

363 041102 000004 SCOPE SCALL THE SCOPE LOOP UTILITY 

364 041104 012700 000600 MOV #600,R0 :;LOAD RO WITH TEST NUMBER 

365 041110 015701 941122 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

366 041114 012702 041154 Movs #7. R2 “R2 CONTAINS ADDRESS OF JUMP ADDRESS 

367 041120 000277 3c SSET NC = 1111 

44 041122 000132 23: JMP a(R2)+ sTEST THE JMP - GO TO 4$ 

371 041124 104006 33: ERROR «6 :JMP FAILED TO LOAD PC | 
$72 061126 000414 BR TS1601 °3G0 TO SCOPE EXIT 

374 041130 103003 4s: = BKCC(‘“S :BR IF JMP CLEARED "'C"" 

375 041182 102002 Bveté‘*SS “BR IF JMP CLEARED "V"" 

376 0411384 001001 BNE 58 “BR IF JMP CLEARED “2"" 

377 041186 100401 BMl sO “BR IF 'N' STILL SET | 
379 041140 104006 $$: ERROR 6 :JMP ALTERED CODES = CLEAR | 
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JMP TEST MODE 3; FLAGS = 1111 


11380 

11381 041142 tb 041156 6$: CMP #7$+2,,R2 3D1D JMP UPDATE R2? 

to 041146 0014 BEQ TS$1601 :;BR IF YES 

11384 041150 104006 ERROR 6 ;JMP FAILED TO UPDATE REGISTER 
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CQKDAD.P11 


SSSSESESs 


SSRLFARA 
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ee ee ee ee 
ee elt el elt el ld 
AAA 
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041200 


041202 
041204 


041206 
041210 
041212 
041214 


041216 
041220 


041222 
041224 


041226 


041246 


041250 
041252 


041254 
041256 
041260 


041262 


041270 
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000402 
041130 
104006 


000004 
012700 


000257 
000132 


104006 
000410 


103403 
102402 
001401 
100004 


104006 
000402 


041206 
104006 


000004 


012702 
000277 


000142 


104006 
000414 


000402 
104006 
000411 


103003 
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000601 
041200 
041222 


000602 
041246 
041256 
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1600 S 


JMP TEST MODE 3; FLAGS = 1111 SEQ 0212 
BR TS1601 3:G0_TO SCOPE EXIT 

7$: 4$ 7 JMP3 CONTAINS JUMP ADDRESS 
ERROR 6 - TERROR CALL OCCURS IF MODES HAPPENS 


710 EXECUTE AS MODE 1 OR 2 AND 
348 1S LEGAL INSTRUCTION 


sp eerererererererererereerrerrereeeeerereteneneeeeneeeseeerenTeTe 


s*TEST 601 JMP TEST MODE 3; FLAGS = 0000 
so ereerereerererereererererrrererererrrenareseeeeneereneerererete 
TST601: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #601,R0 3;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #6$,R2 >R2 CONTAINS ADDRESS OF JUMP ADDRESS 

CCC sMAKE N:C = 0000 
23: JMP a(R2)+¢ ;TEST THE JMP - GO TO 4$ 
3$: ERROR 6 ;JMP FAILED TO LOAD THE PC 

BR TS1602 ::G0 TO SCOPE EXIT 
4$: BCS 5$ :BR IF JMP SET “'C’’ 

Bvs 5$ sBR IF JMP SET ‘‘v"" 

BEQ 5$ :BR IF JMP SET “‘2"* 

BPL TST602 7;BR IF “'N’’ STILL CLEAR 
5$: ERROR 6 ;JMP ALTERED CODES - SET 

BR TS1602 7:60 TO SCOPE EXIT 
6$: 4% ; JUMP ADDRESS IN 6% 

ERROR 6 :JMP MODE 3 EXECUTED LIKE MODE : OR 2 
py eeeeererrerereererererererererererereerenerererenereresereeeeee 
7*TEST 602 JMP TEST MODE 4: FLAGS = 1111 
so eetererrerereeeeerrererrerererereerereeraneneenanereeeerareeeTe 
TST602: 

SCOPE 7CALL THE SCOPE LOOP UTILITY 

MOV #602,R0 ::;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

MOV #5$,R2 ;CR2]) = JMP ADDRESS PLUS 2 

$cc sMAKE N:C = 1111 
23: JMP -(R2) :TEST THE JMP = GO TO 5$ MINUS 2 
3$: ERROR 6 7 JMP FAILED TO LOAD PC 

BR TS1603 3:G0 TO SCOPE EXIT 

GR 4$ :GO TEST FLAGS - JMP LOADED PC OK 
5$: ERROR 6 7 JMP FAILED TO AUTO=DECREMENT R2 

BR TS1603 3:G0 TO SCOPE EXIT 
4$: BCC 7% 7BR IF JMP CLEARED “'C"* 

BvC 7$ :BR IF JMP CLEARED ‘‘v"’ 

BNE 7$ :BR IF JMP CLEARED ‘'2"' 

BM] 6$ sBR IF N’’ STILL SET 
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#5$-2,R2 
TS1T605 


6 


15: | PAGE 214 
FLAGS = 1111 


SEQ 0213 
7 JMP ALTERED FLAGS 


3D1D JMP UPDATE R2 PROPERLY? 
:3BR IF YES 


;JMP FAILED TO UPDATE REGISTER 


a ee er ee ee 


JMP TEST MODE 4; 


FLAGS = 0000 


*eeteeetererererterterertrererrererererrretertaeetrertertererterereeerere 


7$: ERROR 
63: CMP 
BEQ 
9$: ERROR 
s*TEST 603 
11603: 
SCOPE 
MOV 
MOV 
MOV 
ccc 
23: JMP 
3$: ERROR 
BR 
4$: BCS 
BvS 
BEQ 
BPL 
5$: ERROR 


#603,R0 
a#2$,R1 
#4$+2,R2 


-(R2) 


6 
TS1604 


5$ 
5$ 


5$ 
TS1604 
6 


;CALL THE SCOPE LOOP UTILITY 

[;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;CR2] = JUMP ADDRESS PLUS 2 

:MAKE N:C = 0000 


: TEST THE JMP = TO TO 4$ 


;JMP FAILED TO LOAD PC 
3;G0 TO SCOPE EXIT 


7BR IF JMP SET ‘'C’’ 
:BR IF JMP SET ‘'v"’ 
;BR IF JMP SET “'2"* 
7:BR IF “W'' STILL CLEAR 


;JMP ALTERED CODES - SET 


sy etrterererererrererereruerererererrrereeraenarenereerarenenereeeTe 


s*TEST 604 


sp eeeeererererererrerererereerererereerentaerenearenareneenenans: © 


TS1604: 


2$: 
3$: 


4$: 


5$: 
6$: 


7$: 


JMP TEST MODE 5; 


#604 ,RO 
a#2$,R1 
#JMFS,R2 


a-(R2) 


6 
TST605 


#IMPS=2,R2 
TS1605 


6 
TST605 


FLAGS = 1111 


;CALL THE SCOPE LOOP UTILITY 
3;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
;JMP CONTAINS ADDR+*2 OF JUMP ADDRESS 
;TEST THE JMP = GO TO 4$ 


7; JMP FAILED TO LOAD PC 
3:G0 TO SCOPE OXxIT 


:BR IF JMP CLEARED ‘'C"’ 


;JMP ALTERED CODES - CLEARED 


;D1D R2 GET AUTO-DECREMENTED 
::BR IF YES 


;JMP FAILED TO UPDATE REGISTER 
3:G0 10 SCOPE EXIT 
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1604 JMP TEST MODE 5; FLAGS = 1111 

4% sTHIS LOCATION CONTAINS JMP ADDRESS 
JMPS: ERROR 6 :JMP EXECUTED LIKE A MODE 1 OR 2 
pp eetererrerereererererrrrrrrrerereererereereeeeeeeeneeeenerenees 
s*TEST 695 JMP TEST MODE 5; FLAG = 0000 
sy ererereerrereerrrererererereeerenerererenereeeerekeneeeeeeeenese 
TST605: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

MOV #605,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 :LOAD R1 WITH TEST INSTRUCTION WORD 

MOV #JMPSA,R2 3C(R2] = ADDR +2 OF JUMP ADDRESS 

CCC :SET N:C = 0000 
2s: JMP a-(R2) ;TEST THE JMP - GO TO 4$ 
3$: ERROR 6 ;JMP FAILED TO LOAD PC 

BR TS1606 3:G0 TO SCOPE EXIT 
4$: BCS 5$ :BR IF JMP SET “'C’’ 

BVS 5$ :BR IF JMP SET ‘'v"’ 

BEQ 5$ :BR IF JMP SET ‘'2"' 

BPL TS1T606 77BR IF "'N’' STILL CLEAR 
5$: ERROR 6 ;JMP ALTERED THE CODES - SET 

BR TS1606 3:G0 TO SCOPE EXIT 

4% sTHIS LOCATION CONTAINS JUMP ADDRESS 
JMP5A: ERROR 6 ;JMP EXECUTED LIKE A MODE 1 OR 2 


**@eeeterteeereererteereertieeererereeeteeeeeerenaertekeetekesrereeeeeeeeeese 


TEST 606 JMP TEST MODE 6; FLAGS = 1111 


**@eerreeetererereeeeteeereeeeetereretetetetateeeeaeeeteeeereeeeetese 


1S1606: 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #606 ,RO 7;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #7$,R2 ;CR2] = BASE ADDRESS TO BE INDEXED 
scc 7MAKE N:C = 1111 
2$: JMP 4$-7$(R2) ; TEST THE JMP - GO TO 4$ 
3$: ERROR 6 ;JMP FAILED TO LOAD THE PC 
BR TS1607 3:G0 TO SCOPE EXIT 
4$: BCC 5$ ;BR IF JMP CLEARED ‘'C"’ 
BvC 5$ 
BNE 5$ 
BM1 1TS$1607 7:BR IF “'N’ STILL SET 
5$: ERROR 6 ;JMP ALTERED CODES - CLEARED 
BR TS1607 3:G0 TO SCOPE EXIT 
7$: ERROR 6 ;JMP EXECUTED LIKE A MODE 1 OR 2 OR 


sFAILED TO INDEX CR2) 


speeeeeeerceveceeresecceeceseveserarereneesesereseereressenceneree 
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CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 3S0A(1052) 11-SEP-79 13:53 PAGE 216 
CQKDAD.P11 11-SEP-79 13:31 1607 JMP TEST MODE 6; FLAGS = J000 SEQ 0215 
11553 s*TEST 607 JMP TEST MODE 6; FLAGS = 0000 

11554 -eereererereeererererrererereerereererrenerertereeeereeeeeeeeE et 
11555 041536 1§1607: 

11556 041536 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

11557 041540 012700 000607 MOV #607,R0 3;LOAD RO WITH TEST NUMBER 

11558 041544 013701 041556 MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 
11559 041550 012702 041602 MOV #7$,R2 ;C(R2] = BASE ADDRESS FOR JUMP 

BF 041554 000257 ccc ;MAKE N:C = 0000 

AF 9g 4 041556 000162 177764 2s: JMP 4$-7$(R2) ; TEST THE JMP = GO TO 4$ 

11564 041562 104006 ' 3$: ERROR 6 ;JMP FAILED TO LOAD PC 

yaaa 041564 000407 ; BR TS1610 ;:G0 TO SCOPE EXIT 

11567 041566 103403 4$: BCS 5$ 7BR IF JMP SET ‘'C'’ 

11568 041570 102402 BVS 5$ ;BR IF JMP SET ‘‘v’’ 

11569 041572 001401 BEQ 5$ :BR IF JMP SET "2" 

AF 4 041574 100003 BPL TST610 7:BR IF “'N’’ STILL CLEAR 

11572 041576 104006 5$: ERROR 6 7; JMP ALTERED CODES 

en 041600 000401 BR TS1610 3;G0 TO SCOPE EXIT 

11575 041602 104006 7$: ERROR 6 7 JMP EXECUTED LIKE A MODE 1 OR 2, OR 
11576 ;FAILED TO INDEX CR2] 

11577 

11578 ppeeewreerererererererrererrereererrereteneeeteeeeteneeeeTeeTeeee 
11579 :*TEST 610 JMP TEST MODE 7; FLAGS = 1111 

11580 ppteeeereerererrererereererererrrrrererenereeeereeeereRetenereeee 
11581 041604 1TS1610: 

11582 041604 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

11583 041606 012700 000610 MOV #610,R0 7:LOAD RO WITH TEST NUMBER 

11584 041612 013701 041624 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11585 041616 012702 041634 MOV #5$,R2 ;CR2] = BASE ADDRESS 

Hey 041622 000277 scc MAKE N:C = 1111 

bby | 041624 000172 000020 2$: JMP a8$-5$(R2) ;TEST THE JMP - GO TO 4$ 

11590 041630 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 

+444 041632 000412 ; BR TST611 3:60 TO SCOPE EXIT 

11593 041634 104006 5$: ERROR 6 ;JMP FAILED TO INDEX OR ACTED LIKE MODE 1 OR 2 
fF +0 041636 000410 BR TST611 3:G0 TO SCOPE EXIT 

1 

11596 041640 103003 4$: BCC 7$ :BR If JMP CLEARED ‘'C"’ 

11597 041642 102002 BvC 7$ 7BR 1F JMP CLEARED ‘‘v"' 

11598 041644 001001 BNE 7$ 7BR IF JMP CLEARED ‘'2"° 

Hees 041646 100404 BM] TST611 7:BR IF "'N’ STILL SET 

6 

11601 041650 104006 7$: ERROR 6 ;JMP ALTERED CODES - CLEARED 

tie 041652 000402 BR TS1611 3;G0 TO SCOPE EXIT 

116 

11604 041654 041640 8$: 4% > THIS LOCATION CONTAINS JMP ADDRESS 
11605 

11606 041656 104006 ERROR 6 ;JMP EXECUTED LIKE MODE 6 

11 

11 


608 speeeereecererceereccereesteccereseerreeerseaseseneanaeseseeeeenesT 
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CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 217 
CQKDAD.P11 11-SEP-79 13:31 1611 JMP TEST MODE 7; FLAGS = J000 SEQ 0216 
11609 s*TEST 611 JMP TEST MODE 7; FLAGS = 0000 

11610 ppeteeerecerrererreerrrereerrererererrererteneereteeeeeeeereeeTETe 
11611 041660 TST611: 

11612 041660 000004 SCOPE sCALL THE SCOPE LOOP UTILITY 
116135 041662 012700 000611 MOV #611,R0 3;LOAD RO WITH TEST NUMBER 

11614 041666 013701 041700 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11615 041672 012702 041710 MOV #5$,R2 ;CR2] = ee ADDRESS 

tore 041676 000257 ccc MAKE N:C = 0000 

begs | 041700 000172 000020 23: JMP a8$-58(R2) ;TEST THE JMP - GO TO 4$ 

11620 041704 104006 3$: ERROR 6 ;JMP FAILED TO LOAD PC 

beat 041706 000412 BR TS1612 3:G0 TO SCOPE EXIT 

11623 041710 104006 5$: ERROR 6 ;JMP FAILED TO INDEX 

Nase 041712 000410 BR TST612 3:G0 TO SCOPE EXIT 

11626 041714 103403 4$: BCS 7$ 7BR IF JMP SET ‘'C'’ 

11627 041716 102402 Bvs 7$ sBR IF JMP SET ‘‘v"’ 

11628 041720 001401 BEQ 7$ ;BR IF JMP SET ‘‘Z"° 

beg 3 041722 100004 BPL TS1612 7:BR IF "'N’’ STILL CLEAR 

11631 041724 104006 7$: ERROR 6 ;JMP ALTERED CODES - SET 

Peg 3 041726 000402 BR TST612 3:G0 TO SCOPE EXIT 

irons 041730 041714 8$: 4% sTHIS LOCATION CONTAINS JUMP ADDRESS 
ie” 041732 104006 ERROR 6 7 JMP EXECUTED LIKE A MODE 6 

11038 ppeeeeeecerererrerereereeeeererererererereeeeeeeteeeeeeneeeeee eee 
11639 s*TEST 612 JSR MODE 1 TEST - LOAD PC / PUSH SP 

11640 prereeererereeereerererrrerererereetrereeeeeeeeeeeeeeeeeeeeee eee 
11641 041734 TST612: 

11642 041734 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11643 041736 012700 000612 MOV #612,R0 : LOAD RO WITH TEST NUMBER 

11644 041742 013701 041764 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
11645 041746 010605 MOV SP,R5 : SAVE THE SP 

11646 041750 010737 001010 MOV PC ,a#$LPERR :SET ERROR LOOP ADDRESS 

11647 041754 010506 1$: MOV R5,SP sRESTORE SP FOR ERROR LOOPING 
11648 041756 012702 041770 MOV #4%,R2 ;DEST ADDR = 4$ 

ese 041762 000257 ccc ;SCOPE SYNC 

6 

ted 4 041764 004412 2$: JSR R4,(R2) ;TEST THE JSR - GO TO 4$ 

116 

atone 041766 104006 3$: ERROR 6 7JSR FAILED TO LOAD THE PC 

11654 

11655 041770 005726 4$: TST (SP)+ ;POP THE SP 

11656 041772 020605 CMP SP,R5 3D1D JSR PUSH THE SP ? 

poets 041774 001406 BEQ 1$1613 3;BR IF YES 

6 

11659 041776 005746 TST (SP) sRESTORE ERROR SP 

11660 042000 010603 MOV SP,R3 ;CR3]= WAS SP 

11661 042002 010504 MOV R5,R4 

11662 042004 005744 TST -(R4) ;CR4]= S/B SP 

11663 042006 104003 5$: ERROR 3 ;JSR FAILED TO PUSH THE SP 

11664 


K 1 
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CQKDAD.P11 11-SEP-79 13:31 T612 JSR MODE 1 TEST - LOAD PC / PUSH SP SEQ 0217 
11665 042010 010506 MOV R5,SP sRESTORE SP IN CASE OF ERROR 

11666 ppeerererereererereererrserrererereerereeereeeeeeReteeeereReeetes 
11667 s*TEST 613 JSR MODE 1 TEST - CHECK RN AND OLD PC 

11668 ppetreerererererrerrreerererereereererrereeeeenetereeeReeerTTeeTs 
11669 042012 TS1613: 

11670 042012 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

11671 042014 012700 000613 MOV #613,R0 :;LOAD RO WITH TEST NUMBER 

11672 042020 013701 042052 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11673 042024 010605 MOV SP,R5 ;SAVE THE SP 

11674 042026 010737 001010 MOV PC ,@#SLPERR :SET ERROR LOOP ADDRESS 

11675 042032 010506 1$: MOV R5,SP RESTORE SP FOR ERROR LOOPING 

11676 042034 012702 042056 MOV #4$,R2 sDEST ADDR = 4$ 

11677 042040 005066 177776 CLR -2(SP) sINIT STACK LOC TO GET CR4J 

11678 0420464 012704 125252 MOV #125252,R4 sINIT RN = 125252 

en 042050 000257 ccc ;SCOPE SYNC 

be ¢ 042052 004412 2$: JSR R4,(R2) TEST THE JSR - GO TO 4$ 

bert 042054 104006 3$: ERROR 6 7 JSR FAILED TO LOAD THE PC 

11685 042056 022726 125252 4$: CMP #125252,(SP)+  ;DID JSR SAVE REG ON STACK 

a eeae 042062 001401 BEQ 8$ :BR IF IT DID 

bey of 042064 104005 5$: ERROR 5 ;JSR FAILED TO SAVE REG ON STACK 
11690 042066 022704 042054 8$: CMP #3$,R4 ;D1D OLD PC GET SAVED ? 

tens 042072 001401 BEQ 6$ ;BR IF YES 

itaet 042074 104005 7$: ERROR 5 JSR FAILED TO SAVE TH OLD PC 

6 

heed 042076 010506 6$: MOV R5,SP RESTORE SP IN CASE ERROR SCREWED IT UP 
saa Leta tate glen tapioca ala taal tiie 
11698 s*TEST 614 JSR MODE 1 TEST - N:C = 0000 

11699 peteeeerererererererererererereeereereeeeeeeeeeeteteeeeeeeeeeTeee 
11700 042100 TST614: 

11701 042100 000004 SCOPE ey THE SCOPE LOOP UTILITY 

11702 042102 012700 000614 MOV #614,R0 ;LOAD RO WITH TEST NUMBER 

11703 042106 013701 042142 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
11704 .SBTTL USER CONTROLLED BREAKPOINI -- BITI2 

11705 042112 032737 010000 063234 BIT #B1112,a#BPTLOC ;BREAKPOINT HALT SET ?? 

11706 042120 001401 BEQ #4 :BR IF NOT 

11707 042122 000000 HALT sBREAK-DEPRESS CONTINUE TO CONTINUE 
11708 042124 010605 MOV SP.R5 ;SAVE THE SP 

11709 042126 010737 001010 MOV PC ,a#SLPERR SET ERROR LOOP ADDRESS 

11710 042132 010506 1$: MOV R5,SP :RESTORE SP FOR ERROR LOOPING 

11711 042134 012702 042146 MOV #4$,R2 ;DEST ADDR = 4$ 

Ha 042140 000257 ccc :N:C = 0000 

asone 042142 004412 2$: JSR R4,(R2) ;TEST THE JSR - GO TO 4$ 

1 

Ayal! 042144 104006 3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 

11 

11718 042146 100403 4$: BM] 5$ sN:C = 0000 ? 

11719 042150 001402 BEQ 5$ 

11720 042152 102401 BvS 5$ 
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CQKDAD.P11 11-SEP-79 13:31 USER CONTROLLED BREAKPOINT -- BITI2 SEQ 0218 


11721 042154 103001 BCC 6% 


11722 
aye 042156 104005 5$: ERROR 5 JSR FAILED = ALTERED FLAGS 
11725 042160 010506 6$: MOV R5,SP RESET SP IN CASE OF ERROR 
11726 -- p_teeeererrerrererererererereeteerrereterenereeetereneeeteKeereee 
11727 : s*TEST 615 JSR MODE 1 TEST - N:C = 1111 
11728 --. speeeereerereerreerreerrereerrerereerreeeeeneereReneteneeeReeneTe 
11729 042162 TST615: 
11730 042162 000004 SCOPE CALL THE SCOPE LOOP UTILITY 
11731 042164 012700 000615 MOV #615,R0 ;;LOAD RO WITH TEST NUMBER 
11732 042170 013701 042212 MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
11733 042174 010605 MOV SP,R5 ;SAVE THE SP 
11734 042176 010737 001010 MOV PC ,A#SLPERR ;SET ERROR LOOP ADDRESS 
11735 042202 010506 1$: MOV R5,SP RESTORE SP FOR ERROR LOOPING 
11736 042204 012702 042216 MOV #4$,R2 ;DEST ADDR = 4$ 
a rte 042210 000277 scc gN:C = 1101 
Aiko 4 042212 004412 23: JSR R4,(R2) TEST THE JSR - GO 10 4$ 
ieee 042214 104006 3$: ERROR 6 7 JSR FAILED TO LOAD THE PC 
11743 042216 100003 4$: BPL 5$ gN:C = 1111 ? 
11744 042220 -001002 - BNE 5$ 
11745 042222 102001 BvC 5$ 
11746 042224 103401 . BCS 6$ 
thes 042226 104005 5$: ERROR 5 7 JSR ALTERED FLAGS 
tia 4 042230 010506 6$: MOV R5,SP ;RESET SP IN CASE OF ERROR 
11751 _% ple eeeeerereeerreerererererereererererreeeeeeeeeeeeeetereteretee 
11752 s*TEST 616 JSR MODE 2 TEST 
11753 pe eeeereecererrererrereerereererrrerrereeeeeeeeeeReeeeTeretereee 
11754 042232 TST616: 
11755 042232 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11756 042234 012700 000616 MOV #616,R0 ;;LOAD RO WITH TEST NUMBER 
11757 042240 013701 042262 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11758 042244 010605 MOV SP.R5 ;SAVE THE SP 
11759 042246 010737 001010 MOV PC ,A#SLPERR ;SET ERROR LOOP ADDRESS 
11760 042252 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOPS 
11761 042254 012702 042266 MOV #4$,R2 ;DEST ADDR = 4$ 
Hee 042260 000257 ccc ;SCOPE SYNC 
sites 042262 004422 23: JSR R4,(R2)+ ;TEST THE JSR - GO TO 4$ 
6 
Ha! 042264 104006 3$: ERROR 6 ;JSR FAILED TO LOAD THE PC 
6 
11768 042266 005726 4%: 1ST (SP)+ sRESET SP 
11769 042270 020605 CMP SP,R5 DID JSR PUSH STACK ? 
Hae 042272 001406 BEQ TS1617 ::BR IF YES 
11772 042274 005746 TST ~ (SP) RESET SP TO ERROR VALUE 
11773 042276 010605 MOV SP,R3 sWAS SP 
11774 042300 010504 MOV R5,R4 
11775 042302 005744 TST =(R4) :$/B SP 
11776 042304 104003 5$: ERROR 3 ;JSR FAILED TO PUSH SP 
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CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 11-SEP-79 13:31 1616 JSR MODE 2 TEST SEQ 0219 
11777 

4 042306 010506 MOV R5S,SP sRESTORE SP JUST IN CASE 

11780 ppeeeerererererererrereereererererererreeeererereKetereterereeete 
11781 *TEST 617 JSR MODE 3 TEST 

11782 ppeeeeererererererererrreererererrreerereReeeeeeeneeteneetenereee 
11783 042310 TST617: 

11784 042310 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11785 042312 012700 000617 MOV #617,R0 7;LOAD RO WITH TEST NUMBER 

11786 042316 013701 042340 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11787 042322 010605 MOV SP,R5 7SAVE THE SP 

11788 042324 010737 001010 MOV PC ,a#SLPEKR ;SET ERROR LOOP ADDRESS 

11789 042330 010506 1$: MOV R5,SP sRESET SP FOR ERROR LOOPS 

11790 042332 012702 042366 MOV #7$,R2 DEST ADDR = (78) 

Fy ad 042336 000257 ccc ;SCOPE SYNC 

bac 042340 004432 2$: JSR R4,a(R2)+ ; TEST THE JSR - GO TO 4$ VIA 7$ 
nie 042342 104006 3$: ERROR 6 7JSR FAILED TO LOAD THE PC 

11797 042344 005726 4$: TST (SP)+¢ sRESET SP 

11798 042346 020605 CMP SP,R5 :D1D JSR PUSH STACK ? 

os 042350 001411 BEQ 1$1620 3:BR IF YES 

11801 042352 005746 TST -(SP) sRESET SP TO ERROR VALUE 

11802 042354 010603 MOV SP,R3 WAS SP 

11803 042356 010504 MOV R5,R4 

11804 042360 005744 TST -(R4) :S/B SP 

11805 042362 104003 5$: ERROR 3 7 JSR FAILED 

ee 042364 000402 BR 6$ 3G0 EXIT 

11808 042366 042344 7$: 4$ ;CONTAINS JUMP ADD 

Ae: 042370 104006 ERROR 6 3: JSR EXECUTED ‘~y A MODE 1 OR 2 
bs 042372 010506 6$: MOV R5,SP sRESTORE SP JUST IN CASE 

bea ppeeetereeeererrereeeeererererereeeerereeereeeereteereneeeeeneeee 
11814 7*TEST 620 JSR MODE 4 TEST 

11815 sp eeeeeeeerrerererrerrerertererererererreeeeeeeneeeeeeeeeeee Eee 
11816 042374 TST620: 

11817 042374 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
11818 042376 012700 000620 MOV #620,R0 3;LOAD RO WITH TEST NUMBER 

11819 042402 013701 042424 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11820 042406 010605 MOV SP.R5 7SAVE THE SP 

11821 042410 010737 001010 MOV PC ,A#SLPERR :SET ERROR LOOP ADDRESS 

11822 042414 010506 1$: MOV R5,SP sRESET SP FOR ERROR LOOPS 

11823 042416 012702 042432 MOV #5$,R2 :DEST ADDR = 4$+2 

bY 042422 000257 ccc ;SCOPE SYNC 

tee 042424 004442 28: JSR R4,-(R2) 7; TEST THE JSR = GO TO 4$ 

1 

atase 042426 104006 3$: ERROR 6 7 JSR FAILED TO LOAD THE PC 

11 

11830 042430 000401 4$: BR o$ ; JUMPED OK = GO CHECK SP 

Hy it 042432 104005 5$: ERROR 5 JSR FAILED TO DECREMENT DEST REG 
11 
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005726 
020605 
001406 


005746 


104003 
010506 


000004 


000257 
004452 
104006 
005726 
020605 
001411 
005746 
010603 
010504 
005744 
104003 
000402 


042512 
104005 


010506 


000621 
042506 


001010 
042536 


000622 
042572 


001010 
042576 
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1620 JSR MODE 4 TEST 


6$: 


7$: 
&$: 


SP RS 
TST621 


R5,SP 


sRESET SP 
7D1D JSR PUSH STACK ? 
7:BR IF YES 


;RESET SP TO ERROR VALUE 
;WAS SP 


:$/B SP 
;JSR FAILED TO PUSH SP 


RESTORE SP JUST IN CASE 


sp ereererrerrereerrrererereerereserererenereneeeeeteeeeneKereeese 


S*TEST 621 


-s@@aerketererrerrererererreererererereeeteetenkeeeketeteeaeneteneeeeeeee 


181621: 


5$: 


7$: 
6$: 


JSR MODE 5 TEST 


SP.R5 
PC ,a#SLPERR 
R5,SP 
#7$,R2 


R4 ,a-(R2) 


- (SP) 
SP,R3 
R5,R4 
=(R4) 
3 
6$ 


5 
R5,SP 


;CALL THE SCOPE LOOP UTILITY 

3;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
SAVE THE SP 

SET ERROR LOOP ADDRESS 

RESET SP FOR ERROR LOOPS 

DEST ADDR = [7$ - 2) 

SCOPE SYNC 


sTEST THE JSR - GO TO 4$ 
;JSR FAILED TO LOAD THE PC 
sRESET SP 

3D1D JSR PUSH STACK ? 

3:BR IF YES 

sRESET SP TO ERROR VALUE 
sWAS SP 

38/B SP 

3 JSR FAILED TO PUSH SP 
360 EXIT 


CONTAINS JUMP ADDRESS 
;JSR EXECUTED LIKE A MODE 1 OR 2 


RESTORE SP JUST IN CASE 


ppeteereerereeeererrereeetrrrereneeerteneeeeeeAeeTeReKeKE eee 


SeTEST 622 


RHR eee eee ee eee eeteeeeeeeeeeeeKtkeeteteretereeeese 


1$1622: 


1$: 


OPE 


JSR MODE 6 TEST 


SP,R5 
PC ,a#$LPERR 
R5,SP 
#3$,R2 


;CALL THE SCOPE LOOP UTILITY 

;;LOAD RO WITH TEST NUMBER 

LOAD R1 WITH TEST INSTRUCTION WORD 
SAVE THE SP 

SET ERROR LOOP ADDRESS 

;RESET SP FOR ERROR LOOPS 

;CR2] = BASE DEST ADDR 


SEQ 0220 


B 
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CQKDAD.P11 11-SEP-79 R MODE 6 TEST SEQ 0221 
11889 042570 000257 aad :SCOPE SYNC 

11691 042572 0046462 000002 2s: JSR RG, 4$-3$(R2) :TEST THE JSR - GO TO 4$ 

11895 042576 104006 3s: ERROR 6 :JSR FAILED TO LOAD THE PC OR INDEX FAILED 
11895 042600 005726 43: 1ST (SP) :RESET SP 

11896 042602 020605 CMP SPLRS “DID JSR PUSH STACK ? 

11897 042606 001406 BEQ 1S1623 ::BR IF YES 

11899 042606 005746 1ST -(SP) :RESET SP TO ERROR VALUE 

11900 042610 010603 MOV SP,R3 sWAS SP 

11901 042612 010504 MOV R5,R4 

11902 042614 005744 1ST =(R4) :$/B SP 

11903 042616 104003 5$: ERROR 3 :JSR FAILED TO PUSH STACK 

11904 042620 010506 MOV RS,SP [RESET SP JUST IN CASE 

11906 pp eeeeeeeereererererrrererrerererererrreneereeeeKeareeeererereees 
11907 Z*TEST 623 JSR MODE 7 TEST 

11908 pp ereeereerererrerererererrerrrererereReKeeareReKenererererereres 
11909 042622 1$1623: 

11910 042622 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
11911 042624 012700 000623 MOV #623,R0 ::LOAD RO WITH TEST NUMBER 

11912 0642630 013701 042652 MOV a#2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
11913 042634 010605 MOV SP.RS >SAVE THE SP 

11914 042636 010737 001010 MOV PC a#SLPERR [SET ERROR LOOP ADDRESS 

11915 042642 010506 1$: MOV R5,SP “RESET SP FOR ERROR LOOPS 

11916 042644 012702 042656 MOV #3$,R2 [BASE DEST ADDR = 3$ 

197 042650 000257 CCC :SCOPE SYNC 

11919 042652 004472 000024 2s: JSR R4,a7$-38(R2)  ;TEST THE JSR - GO TO 4$ VIA 7$ 
11921 042656 104006 3$: ERROR 6 :JSR FAILED TO LOAD THE PC 

i922 [OR THE INDEX FAILED 

11924 042660 005726 4$: 1ST (SP)+ :RESET SP 

11925 042662 020605 CMP SP,R5 =DID JSR PUSH STACK ? 

11926 042664 001411 BEQ TS1624 >:BR IF YES 

11928 042666 005746 1ST -(SP) :RESET SP TO ERROR VALUE 

11929 042670 010603 MOV SPR3 sWAS SP 

11930 042672 010504 MOV R5R4 

11931 042674 005744 1ST -(R4) :$/B SP 

11932 042676 104003 5$: ERROR 3 > JSR FAILED TO PUSH STACK 

11938 042700 000402 BR 6$ “SKIP TO EXIT 

11935 042702 042660 7$: 4$ :CONTAINS JUMP ADDR 

11936 042704 104005 ERROR 5 [JSR WORKED LIKE A MODE 1 OR 2 
11938 042706 010506 63: MOV R5,SP SRESTORE SP JUST IN CASE 

bees cone aba | uae Geek Sah uc hah Gee ae, a ae 
11941 :STEST 624 SOB TEST, CR] = 1, NO BRANCH 

11942 > ec I i ot Be ok Sia Rane cS A OPE 
11943 042710 181624: 

11944 042710 000004 SCOPE ZCALL THE SCOPE LOOP UTILITY 


2 
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CQKDAD.P11 11-SEP-79 13:31 1624 SOB TEST, CR) = 1, NO BRA SEQ 0222 
11945 042712 012700 000624 MOV #624 ,R0 ;;LOAD RO WITH TEST a ne 

11946 042716 013701 042736 MOV a#2$,R1 LOAD R1 WITH vest INSTRUCTION WORD 
11947 042722 012702 000001 MOV #1,R2 SET SOB COUNTER = 1 

bo ay 042726 000402 BR 2$-2 £60 DO THE SOB 

11950 042730 104006 3$: ERROR 6 ;SOB SHOULDN'T HAVE BRANCHED HERE 
11333 042732 000402 BR TST625 3;G0 TO SCOPE CALL 

11953 042734 000257 ccc 3SYNC INSTR. 

a yeee 042736 077204 2$: $08 R2,3% ;TEST THE SOB 

11956 pLeeeereerereeereeerrrererrererrerererreeereeeKeeeeeeneeeerTeeTe 
11957 s*TEST 625 SOB TEST, CR) = 5, BRANCH 4 TIMES 

11958 , ppeteereerereeereeereerereeeererrrrreereeeererererereneteeeTTerTe 
11959 042740 TST625: 

11960 042740 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

11961 042742 012700 000625 MOV #625 RO :;LOAD RO WITH TEST NUMBER 

11962 042746 013701 043000 MOV a#SO0B2,R1 ;GET COPY OF TEST INSTRUCTION WORD 
11963 042752 012702 000005 MOV #5,R2 :SET SOB COUNTER = 5 

11964 042756 012705 177773 MOV #-5,R5 7SET UP RS TO COUNT 5 BRANCHES 
ieeen 042762 000405 BR SOB2-2 :GO DO THE SOB 

11967 042764 000474 SOB1: BR SOB3 ;USED BY LAST SOB TEST TO TEST MAX OFFSET 
11968 042766 000240 NOP OFFSET ADJUSTMENT 

iets 042770 000240 NOP 

11971 042772 005205 SOB5: INC R5 ;COUNT ONE BRANCH 

ore 042774 001406 BEQ SOBERR 7BR IF TOO MANY LOOPS BY SOB 

11974 042776 000257 ccc ;SCOPE SYNC 

11975 043000 077204 SOB2: SOB R2,S0B5 :TEST THE SOB 

11976 043002 005702 TST R2 ;R2 SHOULD CONTAIN 0 

oe 043004 0014035 BEQ TST626 3;BR IF IT DOES 

11979 043006 104006 ERROR 6 ;SOB COUNTER NOT ZERO 

11980 043010 000401 BR TS1626 3;G0 TO SCOPE CALL 

11981 043012 104006 SOBERR: ERROR 6 ;SOB MADE TOO MANY BRANCHES 

be 4 peeeeererererereeereeerereerererererereeKeeeeeeeeeeeeeeeeeeTetes 
11984 TEST 626 SOB TEST, CR] = 1, FLAGS = 1111 | 
11985 Pee eeeercererererererererereeerereerererereeeeneerenerereeeeTe 
11986 043014 TST626: 

11987 043014 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY | 
11988 043016 012700 000626 MOV #626,R0 3;LOAD RO WITH TEST NUMBER 

11989 043022 013701 043034 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
11990 043026 C12702 000001 MOV #1,R2 ;SET SOB COUNTER = 1 

$a 043032 000277 scc MAKE N:C = 1111 

baad, 043034 077202 2$: $08 R2,2$-2 TEST THE SOB 

11994 

11995 043036 103003 BCC 3$ :BR 1F C = 0 

11996 043040 102002 BvC 3$ ;BR IF v = 0 

11997 043042 001001 BNE 3$ :BR IF 2 = 0 

oo 043044 100401 BM] T$1627 :;BR IF N= 1 

1 

12000 043046 104006 3$: ERROR 6 ;SOB ALTERED CODES = CLEARED ONE 
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1626 SOB TEST, CR) = 1, FLAGS = 1111 


*-@@eeeetererreererreerrrecrrrerrerrrerrrerrerereeetererrereereeeee 


[TEST 627 SOB TEST, CR] = 1, FLAGS = 0000 
pp eterererererrrererererrecererrererrerererertrerereneeeerereereres 
$1627: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #627.R0 [;LOAD RO WITH TEST NUMBER 


MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 


MOV #1,R2 SET SOB COUNTER = 1 

ccc ;MAKE N:C = 0000 
23: $08 R2,2$-2 ; TEST THE SOB 

BCS 3$ :BR IF C = 1 

BvS 3$ ;BR IF v= 1 

BEQ 3$ :BR IF Z = 

BPL T$1630 7:BR IF N= 0 
3$: ERROR 6 ;SOB ALTERED CODES - SET ONE 
ppeeeererereereerereeererrrerererereeereeererereerereeereKerereTe 
z*TEST 630 SOB TEST, CR) = 5, FLAGS = 1111 


py eteeererererrerereeeeerreseerrereerereeKeneReeneseReeeRereTeeee 
TS1630: 

SCOPE s;CALL THE SCOPE LOOP UTILITY 

MOV #630,R0 ::LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 


MOV #5,R2 7SET SOB COUNTER = 5 
$cc sMAKE N:C = 1111 
2$: $0B R2,2$% sTEST THE SOB 
BCC 3$ :BR IF C = 0 
BvC 3$ :BR IF v = 0 
BNE 3$ sBR 1F Z = 0 
BM! TS1631 3:BR IF N= 1 
3$: ERROR 6 3;SOB ALTERED CODES - CLEARED ONE 


ppeteerereerrerereerereerereerrererereerereneeeeeeererererereteTs 
*TEST 631 SOB TEST, CR] = 5, FLAGS = 0000 
ppeeerecerererererereererrrerererertereererereeeeeeeeeereeeeetTsS 
TST631: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #631,R0 3:;LOAD RO WITH TEST NUMBER 

MOV a#S0B4 ,R1 3GET COPY OF TEST INSTRUCTION WORD 


MOV #5,R2 3SET SOB COUNTER = 5 
$0B3: CCC sMAKE N:C = 0000 
SO0B4: $0B R2,S0B1 sTEST THE SOB 

BCS 3$ sBR 1F C = 1 

Bvs 3$ sBR IF v= 1 

BEQ 3$ sBR 1f 2 = 1 

BPL 181632 ::;BR IF N= 0 


SEQ 0223 
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CQKDAD.P11 11-SEP-79 13:31 1631 SOB TEST, CR] = 5, FLAGS = 0000 SEQ 0224 
1g03t 043172 104006 3$: ERROR 6 7SOB ALTERED CODES - SET ONE 
12059 _) anes gia abit an ean a ata i 
12060 s*TEST 632 RTS TEST - N:C = 0000 

12061 pp eeeeeerererereeeerereeeeeereerereereerereerereretererereeeATeee 
12062 043174 TST632: 

12063 043174 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12064 043176 012700 000632 MOV #632,R0 3;LOAD RO WITH TEST NUMBER 

12065 043202 013701 043234 MOV a#2$,Ri ;LOAD R1 WITH TEST INSTRUCTION WORD 
12066 043206 010605 MOV SP,R5 ;SAVE THE SP 

12067 043210 010737 001010 MOV PC ,a#SLPERR 3SET ERROR LOOP ADDRESS 

12068 043214 012704 177777 1$: MOV #-1,R4 3R3 SHOULD GET 177777 

12069 043220 010506 MOV RS, SP ;RESET SP FOR ERROR LOOP 

12070 043222 012703 043242 MOV #4$,R3 RTS SHOULD LOAD PC FROM C[R3) 
12071 043226 012746 177777 MOV #-1,-(SP) RTS SHOULD LOAD R3 WITH 177777 
ire 043232 000257 ccc 3N:C = 0000 

Sore 043234 000203 23: RTS R3 ; TEST THE RTS = GO TO 4% 

12076 043236 104005 3$: ERROR 5 sRTS FAILED TO LOAD THE PC 

god 043240 000415 BR 10% 360 TO EXIT = SCHOOLS OUT 

12079 043242 100403 4$: BMI 5$ i3N:C = 0000 ? 

12080 043244 001402 BEQ 5$ 

12081 043246 102401 BvS 5$ 

soae 043250 103001 BCC 6$ 

icone 043252 104005 5$: ERROR 5 ;RTS ALTERED CODES - CLEARED ONE 
12086 043254 020403 6$: CMP R4,R3 :D1D R3 GET LOADED FROM STACK ? 
soos 043256 001401 BEQ 8$ BR IF YES 

‘sone 043260 104002 7$: ERROR 2 sRTS FAILED TO LOAD REG 

12091 043262 020506 8$: CMP R5,SP :D1D RTS POP THE STACK POINTER ? 
pos 043264 001404 BEQ TS16335— 3:BR IF YES 

12094 043266 010504 MOV R5,R4 3CR4] = : / B SP 

12095 043270 010603 MOV SP.R3 3CR3] = WAS SP 

4245] 043272 104003 9$: ERROR 3 ;RTS FAILED TO POP SP 

eee 043274 010506 10$: MOV R5.SP FIM THE SP 

bie ppeMeeeeeeerererereereneeretereererereneneKerteKereeeeeerereTeS 
12101 s*TEST 633 RTT TEST = N:C = 1111 

12102 ppeeerrerereerererrrererererererererereretereerereteerenerterete 
12103 043276 1T$1633: 

12104 043276 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12105 043300 012700 000633 MOV #633,R0 3;LOAD RO WITH TEST NUMBER 

12106 043304 013701 043346 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12107 043310 012702 177776 MOV #PSw,R2 ;DEST=PSwW FOR S$ CALL 

12108 043314 010605 MOV SP,R5 sSAVE THE SP 

12109 043316 010737 001010 MOV PC ,a#SLPERR ;SET ERROR LOOP ADDRESS 

12110 043322 010506 1$: MOV R5,SP ;RESET SP FOR ERROR LOOP 

12111 043324 012704 000340 MOV #320,R4 3CR4] = S$ / B PSwW AT HTIS POINT 
12112 043330 012746 000340 MOV #340,-(SP) ;NEW PSW S / B = 340 
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COKDAD.P11 11-SEP-79 13:31 16330 RTT «TEST = WiC = 1111 SEQ 0225 
12113 043334 012746 043354 MOV #4$,-(SP) :NEW PCS / B= 4$ 

12114 043340 005037 177776 CLR aePSw [CLEAR THE PSw 

1211s 043344 000277 SCC tN:C = 1111 

lent? 043346 000006 2$: RTT :TEST THE RTT - GO TO 4$ 

12119 043350 104005 38: ERROR 5 :RTT FAILED TO LOAD THE PC 

12120 043352 000412 BR 8$ [G0 TO EXIT = SCHOOL'S OUT 

12122 043354 013703 177776 4$: MOV aePSw,R3 :SAVE THE PSw 

12123 043360 020403 CMP RG,R3 “WAS PSW = 340 ? 

12124 043362 001401 BEQ 6$ :BR IF IT WAS 

12126 043364 104001 5$: ERROR 1 :RTT FAILED TO LOAD PSW PROPERLY 
12128 043366 020506 6$: CMP R5,SP :DID RTT UPDATE THE SP ? 

12129 043370 001404 BEQ TS1634 >:BR IF YES 

12131 043372 010504 MOV RS,RG -(R4] = S$ / BSP 

12132 043374 010603 MOV SP,R3 -(R3] = WAS SP 

12138 043376 104003 7$: ERROR 3 “RTT FAILED TO UPDATE SP 

12135 043400 010506 8$: MOV RS,SP sFIX THE SP 

12137 p_eeeeererereeerereeerereeeerKeeeKeKteKeeKeKeeKAeeKeKeeKereeKes 
12138 S*TEST 634 RTT TEST - N:C = 0000 

12139 ppteeerertereererrereererererereretereerereeeKeeeeeeeeeeeTenereee 
12140 043402 181634: 

12141 043402 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
12142 043404 012700 000634 MOV #634 RO ::LOAD RO WITH TEST NUMBER 

12143 043410 013701 043454 MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
12144 043414 012702 177776 MOV #PSW.R2 “DEST=PSw FOR 5$ CALL 

12145 043420 010605 MOV SP.RS >SAVE THE SP 

12146 043422 010737 001010 MOV PC a#SLPERR >SET ERROR LOOP ADDRESS 

12147 043426 010506 1$: MOV R5,SP “RESET SP FOR ERROR LOOP 

12148 043430 012706 000017 MOV #017,R4 >(R4) = S / B PSw AT HTIS POINT 
12149 043434 012746 000017 MOV #017.-(SP) “NEW PSW S / B = 017 

12150 043440 012746 043462 MOV #4$,-(SP) “NEW PC S / B= 4$ 

12151 043444 012737 000340 177776 MOV #340,aePSW [MAKE CPSW) = 340 

12152 043452 000257 ccc =N:C = 0000 

12154 043454 000006 2s: RIT :TEST THE RTT - GO TO 4$ 

12156 043456 104005 3$: ERROR 5 :RTT FAILED TO LOAD THE PC 

12157 043460 000412 BR 8S [GO TO EXIT - SCHOOL'S OUT 

12159 043462 013703 177776 4$: MOV aePsw.R3 sSAVE THE PSW 

12160 043466 020403 CMP RG RS “WAS PSwW = 017 ? 

12161 043470 001401 BEQ 6$ “BR IF IT WAS 

6 

12163 043472 104001 5$: ERROR 1 :RTT FAILED TO LOAD PSw PROPERLY 
12164 

12165 043474 020506 6$: CMP RS.SP :DID RTT UPDATE THE SP ? 

12166 043476 001404 BEQ 1§1635 >:BR IF YES 

7 
12168 043500 010504 MOV RS,R4 :(R4] = S$ / BSP 
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1634 RTT TEST - N:C = 0000 


MOV SP,R3 ;CR3] = WAS SP 


7$: ERROR 3 sRTT FAILED TO UPDATE SP 
8$: MOV R5,SP sFIX THE SP 
; seterererrerrererererererererreererererreeeteerereeeeeeeeeKerene 
s*TEST 635 MARK INSTRUCTION TEST - N:C=0000 
sp erterereererrrererereererereerrereereereeKeeKenneeeeteeeeeneeeTenee 
TS1635: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #635,R0 3;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R2 3;SAVE SP 
MOV #125252,R4 3CR5J SHOULD BE 125252 
MOV #4$,R5 sMARK GOES TO 4$ VIA CR5) 
MOV R4 ,av6$ : INITIALIZE WORD LOADED INTO R5 
CCC 7N:C=0000 
2s: MARK+5S sTEST THE MARK 
MOV SP, ,a#SREGS s;SAVE BAD SP FOR PRINTING 
MOV R2,SP sRESET SP 
3$: ERROR 5 sMARK FAILED TO EXECUTE 
BR TS1636 3:G0 TO SCOPE EXIT 
6$: 125252 :THIS WORD SHOULD GET LOADED INTO R5 
MOV SP, ,a#SREGS sSAVE BAD SP FOR PRINTING 
MOV R2,SP ;RESET SP 
5$: ERROR 5 sMARK FAILED TO LOAD RC FROM [Rd] 
BR 181636 3:60 TO SCOPE EXIT 
4$: BM] 10% 3N:C=0000? 
BEQ 10% 
BvS 10% 
BCC 8$ 
10$: MOV aePsSw,R3 sSAVE FLAGS IN R3 
MOV SP, ,a#$REGS ;SAVE BAD SP FOR PRINTING 
MOV R2,SP sRESET SP 
MCV #PSwW,R2 :DEST=PSwW 
7$: ERROR 7 sMARK SET A FLAG 


BR TS1636 ;;G0 TO SCOPE EXIT 


8$: CMP SP ,#6$+2 :D1D MARK RESET SP? 
BEQ 11$ BR IF YES 
MOV SP,R3 ;PUT BAD SP IN R3 
MOV #6$+2,R4 :$/B SP 
MOV R2,SP ;RESET SP 
9$: ERROR 3 MARK FAILED TO RESET SP 


BR 181636 3:G0 TO SCOPE EXIT 
11$: CMP R5,R4 :D1D MARK RESTORE OLD R5 


SEQ 0226 
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CQKDAD.P11 11-SEP-79 13:31 1635 MARK INSTRUCTION TEST - N:C=0000 SEQ 0227 
1eee> 043650 001405 BEQ 12$ :BR IF YES 

12227 043652 010637 001074 MOV SP ,a#$REGS ;SAVE BAD SP FOR PRINTING 

12228 043656 010503 MOV R5,R3 WAS DEST 

12229 043660 010206 MOV R2,SP RESET SP 

\Scey 043662 104004 ERROR 4 MARK FAILED TO RESET R5 

coat 043664 010206 128: MOV R2,SP RESET SP 

12234 ppeeeeeerecerereeeeererereeeererereeeeererereeeeeeeeeeeeeeTeTe 
12235 *TEST 636 MARK INSTRUCTION TEST = N:C=1111 

12236 ppeeeeeeerrereererercereeerererererererreeerereneeeeKeneeKeretene 
12237 043666 181636: 

12238 043666 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12239 043670 012700 000636 MOV #636,R0 ; LOAD RO WITH TEST NUMBER 

12240 043674 013701 043720 MOV a#2$,R1 LOAD . WITH TEST INSTRUCTION WORD 
12241 043700 010602 MOV SP ,R2 7 SAVE 

12242 043702 012704 125252 MOV #125252 ,R4 CR5) SHOULD BE 125252 

12243 043706 012705 043750 MOV #4$,R5 [MARK GOES TO 4$ VIA [R5} 

12244 043712 010437 043734 MOV R4 ,av6$ S INITIALIZE WORD LOADED INTO R5 
‘sees 043716 000277 scc N:C=1111 

12247 043720 006405 2$: ss MARK#S ;TEST THE MARK 

12249 043722 010637 001074 MOV SP ,a#$REGS >SAVE BAD SP FOR PRINTING 

12250 043726 010206 MOV R2,SP sRESET SP 

4524 043730 104005 3$: ERROR 5 sMARK FAILED TO EXECUTE 

aster 043732 000444 BR 181637 3:G0 TO SCOPE EXIT 

45244 043734 125252 6$: 125252 ; THIS WORD SHOULD GET LOADED INiO R5 
12257 043736 010637 001074 MOV SP ,a#S$REGS ;SAVE BAD SP FOR PRINTING 

12258 043742 010206 MOV R2,SP RESET SP 

+5344 043744 104005 5$: ERROR 5 MARK FAILED TO LOAD RC FROM C[R5) 
aSceo 043746 000436 BR 181637 3:G0 TO SCOPE EXIT 

12263 043750 100003 4$: BPL 7$ oN:C=1111 

12264 043752 001002 BNE 7$ 

12265 043754 102001 BvC 7$ 

+ 548 043756 103411 BCS 8$ 

12268 043760 013703 177776 7$: MOV a#PSwW,R3 SAVE FLAGS IN R3 

12269 043764 010637 001074 MOV SP ,a#$REGS ;SAVE BAD SP FOR PRINTING 

12270 043770 010206 MOV R2,SP ;RESET SP 

12271 043772 012702 177776 MOV #PSW,R2 ;DEST=PSw 

12272 043776 104007 ERROR 7 sMARK SET A FLAG 

2273 044000 000421 BR 181637 3:G0 TO SCOPE EXIT 


2 
2275 044002 020627 043730 8$: CMP SP, #6$+2 ;D1D MARK RESET SP? 

2276 044006 001406 BEQ 9$ ;BR IF YES 

2277 044010 010603 MOV SP,R5 ;PUT BAD SP IN R35 

2278 044012 012704 043736 MOV #6$+2,R4 :$/B SP 

2279 044016 010206 MOV R2,SP RESET S$ 

2280 044020 104003 ERROR 3 ; MARK FAILED TO RESET SP 
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1636 MARK INSTRUCTION TEST = N:C=1111 


BR 181637 3;G0 TO SCOPE EXIT 
9$: CMP R5,R4 3:D1D MARK RESTORE OLD R5 
BEQ 10$ :BR IF YES 
MOV SP ,a#SREGS : SAVE BAD SP FOR PRINTING 
MOV R5.R3 WAS ae 
MOV R2,SP TRESET S$ 
ERROR 4 [MARK FAILED TO RESET RS 
108: MOV R2,SP RESET SP 
peeereerereererereerereererererereeeeereereneereenereeereneerere 
TEST 637 BASIC LINE CLOCK RESPONSE TEST 
peeeerererreerererererererrererereererereererereereneerereereres 
181637: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 


+; LOAD RO WITH TEST NUMBER 

LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R5 :SAVE SP 
:CR2) = LINE CLOCK ADDRESS 


MOV #LKCSR, R2 
MOV PC, AsSLPERR 7SET ERROR LOOP ADDRESS 
1$: MOV R5.SP RESET SP FOR ERROR LOOP 
MOV #4$,a84 :GO0 10 4$ IF BUS TIMEOUT 
ccc :SCOPE SYNC 
2$: TST (R2) ;REFERENCE LKCSR ADDR 
BR 6% 360 TO EXIT 
4$: MOV #BERR,aa4 sRESTORE TIMEOUT VECTOR 
3$: ERROR 6 sLKCSR FAILED TO RESPOND 
6$: MOV R5,SP ;RESET SP 
MOV #BERR, aes sRESTORE TIMEOUT VECTOR 


ppeeweeeerereererrerereerererterererrenerenteeererererenenereres 
*TEST 640 LINE CLOCK TEST = LKCSR BIT 7 SET 
ppeeweeerrereerereerererereeteeeererretetereneneeeneereneneretesS 
TS1640: 

SCOPE :CALL THE SCOPE LOOP UTILITY 


MOV #640,R0 ::LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV #LKCSR,R2 :DEST ADDR = 177546 
MOV #200,R4 :CLKCSR] S / B = 200 
ccc ;SCOPE SYNC 
2$: BIT R4,(R2) :TEST BIT 7 IN LKCSR 
BNE 181641 ::BR IF IT°S SET 
MOV (R2),R3 :GET WAS DATA 
3$: ERROR 1 :B11 7 NOT SET IN LKCSR 


speeeeeeececeseneeseeroveseseesseseeeensreseeaeenseesenaneeenaleTs 


SEQ 0228 
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CQKDAD.P11 11-SEP-7 1 1641 LINE CLOCK TEST - LKCSR BIT 6 CLEAR SFQ 0229 | 


12337 r*TEST 641 LINE CLOCK TEST = LKCSR BIT 6 CLEAR 


*s@erertertererterererrerrererrtrererrereerereteeeteeeteeeeerneeeetereee i 


— 
Nm 
WwW 
Ww 
co 


12339 044162 1$1641: 

12340 044162 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12341 044164 012700 000641 MOV #641,R0 3;LOAD RO WITH TEST NUMBER 
12342 044170 013701 044206 MOV a#2$,R) ;LOAD R1 WITH TEST INSTRUCTION WORD 

12343 044174 012702 177546 MOV #LKCSR,R2 zR2 POINTS TC LKCSR 
12344 044200 012704 000200 MOV #200,R4 sCLKCSR) S / B = 200 
inh 044204 000257 ccc ;SCOPE SYNC | 
12347, 044206 052712 000100 2s: BIT = #100, (R2) TEST BIT 6 IN LKCSR 

Seep 044212 001402 BEQ TST642 7;BR IF CLEAR | 
12351 044214 011203 MOV (R2) ,R3 ;GET WAS DATA | 
Sect 044216 104001 3$: ERROR 1 7BIT 6 CINTR. ENAB.) IN LKCSR WAS SET 

12354 ppReeeeeeeererereeeererereerererereereeteeeeHeKeReKeereeeeeTerere 

12355 s*TEST 642 LINE CLOCK TEST = LKCSR BIT 6 SET 
12356 pLteeeereererereereteerrerererererrereeereneneeeerenereeerererees 

12357 044220 TST642: 
12358 044220 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

12359 044222 012700 000642 MOV #642,R0 ;;LOAD RO WITH TEST NUMBER | 
12360 044226 013701 044276 MOV a#2$,R1 ;LOAD RI WITH TEST INSTRUCTION WORD 
12361 044232 010605 MOV SP,R5 SAVE SP 

12362 044234 012702 177546 MOV #LKCSR,R2 3R2 POINTS TO LKCSR 

12363 044240 012704 000300 MOV #300,R4 sCLKCSR) S / B = 300 

12364 044244 010737 001010 MOV PC ,a#SLPERR ;SET ERROR LOOP ADDRESS 

12365 044250 012737 044312 000100 18: MOV #4%,a#100 :SET UP LCLK VECTOR IN CASE LOGIC 

12366 044256 012737 000340 0600102 MOV #340,a#102 7FAULT CAUSES ATL INTERRUPT 

12367 044264 010506 MOV R5,SP sRESET SP FOR ERROR LOOP 

12368 044266 012737 000340 177776 MOV #340,a#PSw SET PRIORITY TO LEVEL 7 

tt 44 044274 000257 ccc SCOPE SYNC 

‘Seep 044276 052712 000100 2$: BIS #100, (R2) SET BIT 6 IN LKCSR 

12373 044302 020412 CMP R4,(R2) ;RESULT CORRECT? 

ears 044304 001402 BEQ 4$ :BR IF YES 

12376 044306 011203 MOV (R2),R3 ;GET WAS DATA 

gg 14 044310 104001 3$: ERROR 1 :BIT 6 FAILED TO SET IN LKCSR 

12379 044312 042737 000102 000100 4$: BIC #102,a#100 SRESTORE TRAP CATCHER IN LINE CLOCK VECTOR 

12380 044320 005037 000102 CLR a#i0e 

12381 044324 042712 000100 BIC #100, (R2) ; TURN OF LINE CLK INTR. ENAB, 

12382 044330 010506 MOV RS,SP sRESET SP 

Sear p_eeeeererererereererrerereteneeeereKeeeteKeeeereKereeeEteeeTeesS 

12385 *TEST 643 LINE CLK BASIC INTERRUPT TEST 

12386 ppeeecerreerereerrereererererererereeereteterereeeeeserereeteters 

12387 044332 181643: 

12388 044332 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

12389 044334 012700 000643 MOV #643,R0 7;LOAD RO WITH TEST NUMBER 

12390 044340 013701 044406 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

12391 044344 010605 MOV SP,R5 ;SAVE SP 

12392 044346 012702 177546 MOV MLKCSR,R2 ;R2 POINTS TO LKCSR 


CQKDA-D KD11-K BASIC 


CQKDAD.P11 


Nm 
Ss 
—> 
wr 


14 


SCOOnow 


421 


044352 


044406 


044412 
044414 


044416 
044422 


044424 
044430 
044436 
044442 
044444 


044450 
044450 
044452 
044456 
044462 
044470 
044474 
044502 
044506 


044510 


044512 
044516 
044522 


044524 
044530 


044532 
044536 


044540 
044544 
044546 
044552 


044554 
044560 


11-SEP-7 
010737 


000257 
052712 


005304 
001376 


042712 
104006 


042712 
012737 
005037 


010506 
005037 


000004 


000277 
000005 
013705 
032712 
001403 


042712 
104006 


022705 
001406 


012704 


104001 


005037 
042737 


LOGIC TESTS 


9 13:31 
001010 
044424 
000340 
177776 


000100 


000100 


000100 
000102 
000102 


177776 


000644 


000360 
000004 


000004 
000004 
000357 
000357 


177776 


177776 
000004 


000100 
000102 


000100 


001110 
177776 


177564 


K 2 
MACY11 30A(1052) 11-SEP-79 13:53 PAGE 231 | 
1643 LINE CLK BASIC INTERRUPT TEST SEQ 0230 


MOV PC ,@#SLPERR ee ERROR LOOP ADDRESS 


1$: MOV R5,SP RESET SP FOR ERROR LOOP 
CLR R4 INITIALIZE TIMER 
MOV #4$,a#100 ;SET UP LINE CLOCK VECTOR TO T0 
MOV #340,a#102 310 4$ WITH PROCESSOR PRIORITY = 7 
CLR (R2) :CLEAR LKCSR 
CLR aaPsw ;SET PRIORITY TO LEVEL 000 
ccc SCOPE SYNC 
2s: BIS #100, (R2) ENABLE LINE CLK INTERRUPT 
DEC R4 ;WAIT FOR INTR = REPORT ERROR IF 
BNE 2 :R4 GOES TO 000000 
BIC #100, (R2) ; TURN OFF INTR. ENAB. 
3$: ERROR 6 LINE CLK FAILED TO INTERRUPT 
4$: BIC #100, (R2) TURN OFF INTR. ENAB. 
MGV #102,a#100 :RESTORE TRAP CATCHER IN LINE CLK VECTOR 
CLR anio2 
MOV R5,SP sRESET SP 
CLR awPsw ;RESET PRIORITY TO LEVEL 0 
en a eT 
*TEST 644 RESET TEST - N:C = 1111 
sy erteeeeerereerrereteeeterereereeereeereeeeKeKeeeKeeKeKeKeKeeeeese 
TST644: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #644,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #1 ,QaSTIMES ;NO ITERATIONS ON THIS TEST 
MOV #XCSR,R2 ;R2 POINTS TO DL11 XCSR 
MOV #340 ,a#PSW MAKE PRTY. BITS ALL 1°S 
BIS #4, (R2) ;SET THE DL11 MAINT. BIT 
scc sN:C = 1111 
2$: RESET TEST THE RESET - 11 SHOULD CLEAR THE DL11 MAINT BIT 
MOV aePsw RS SAVE THE PSW 
BIT #4,(R2) ;D1D MAINT. BIT CLEAR ?? 
BEQ 4$ :BR IF YES 
BIC #4, (R2) MAKE SURE TO TURN OFF MAINT. BIT 
3$: ERROR 6 ;RESET FAILED TO CLEAR MAINT BIT 
4$: CMP #357,R5 7D1D RESET ALTER THE PSwW ?? 
BEQ 6% ; IF NOT 
MOV +t R4 sCR4) = $/B PSW 
MOV R5,R3 : 33 = WAS PSw 
MOV #PSuR2 DEST = PSW 
5$: ERROR 1 RESET ALTERED THE PSW 
CLR aePSw ;CLEAR OUT THE PSW 
BIC #4 ,a#XCSR MAKE SURE MAINT BIT 1S OFF 
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12449 ete efetaaaa eta ig +a a telat emanate 
12450 s*TEST 645 RESET TEST - N:C = 0000 

12451 ppeeeeeeerereeeererererererrererererererererereerenereeeereeerees 
12452 044566 TST645: 

12453 044566 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12454 044570 012700 000645 MOV #645,R0 3;LOAD RO WITH TEST NUMBER 

12455 044574 013701 044624 MOV 2a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12456 044600 012737 000001 001110 MOV #1 SaeSTIMES 3NO ITERATIONS ON THIS TEST 

12457 044606 012702 177564 MOV #XCSR »R2 3R2 POINTS TO DL11 XCSR 

12458 044612 005037 177776 CLR aaPsw [MAKE PRTY. BITS ALL O'S 

12459 044616 052712 000004 BIS #4, (R2) ba THE DL11 MAINT. BIT 

eat 044622 000257 ccc 3N:C = 0000 

‘reas 044624 000005 2$: RESET sTEST THE RESET - IT SHOULD CLEAR THE DL11 MAINT BIT 
12464 044626 013705 177776 MOV aaPsw,R5 ;SAVE THE PSW 

12465 044632 032712 000004 BIT #4, (R2) 3D1D0 MAINT. BIT CLEAR ?? 

eee 044636 001403 BEQ 4$ 3;BR IF YES 

12468 044640 042712 000004 BIC #4,(R2) sMAKE SURE TO TURN OFF MAINT. BIT 
fo 044644 104006 3$: ERROR 6 ;RESET FAILED TO CLEAR MAINT BIT 
12471 044646 022705 000000 4$: CMP #0,R5 7D1D RESET ALTER THE PSW ?? 

sere 044652 001406 BEQ 6$ ;BR IF NOT 

12474 044654 012704 000357 MOV #357,R4 :CR4] = $/B PSW 

12475 044660 010503 MOV R5.R R3 3CR3] = WAS PSW 

12476 044662 012702 177776 MOV #PSW, R2 sDEST = PSW 

+ ad 044666 104001 5$: ERROR 1 ;RESET ALTERED THE PSW 

12479 044670 005037 177776 6$: CLR aePSwW ;CLEAR OUT THE PSW 

+3] 044674 042737 000004 177564 BIC #4 ,aaXxCSR ;MAKE SURE MAINT BIT IS OFF 

12482 hbo o-> nian gp potatoe rian tape toca +> maaan 
12483 s*TEST 646 WAIT INSTRUCTION TEST = CPSW) = 151 

12484 ppeeeeeeeeeeereeeertereeeeeteerererereeeKeee KERR eee eee 
12485 044702 TST646: 

12486 044702 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12487 044704 012700 000646 MOV #646,R0 3;LOAD RO WITH TEST NUMBER 

12488 044710 013701 044776 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12489 044714 010605 MOV SP,R5 ;SAVE THE SP 

12490 044716 010737 001010 MOV PC ,a#SLPERR ;SET ERROR LOOP ADDRESS 

12491 044722 012702 177564 1$: MOV #XCSR,R2 :R2 POINT TO DLil XCSR 

12492 044726 012737 045014 000064 MOV 44% ,0#64 3G0 TO 4$ - DL11 INTR. 

12493 044734 012737 000200 000066 MOV #200 ,a#66 AT LEVEL 

12494 044742 010506 MOV R5,SP RESET SP FOR ERROR LOOP 

12495 044744 005012 CLR (R2) : INIT DL11 XCSR 

oP 044746 005003 CLR R3 INIT TIMER 

12498 044750 105712 3$: TSTB (R2) 3DL11 XMIT READY SET ?? 

12499 044752 100403 BMI 5$ ;BR IF YES 

12500 044754 005303 DEC R3 ;COUNT THE TIMER 

12501 044756 001374 BNE 3$ ;BR IF NO TIMEOUT 

4 044760 000440 BR 9$ 3G0 REPORT TIMEOUT 

12504 044762 012737 O0C0140 177776 5$: MOV #140,a#PSW ;SET PSw PRTY BITS TO LEVEL 3 
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CQKDAD.P11 11-SEP-79 13:31 WAIT INSTRUCTION TEST = CPSwW) = 151 SEQ 0232 
12505 044770 000277 $cc sN:C=1111 

\Sepe 044772 152712 000100 B1SB #100, (R2) ;ENAB. DL11 INTR = N:C=1001 

‘Stee 044776 000001 2$: WAIT ;TEST THE WAIT-GO TO 4$ ON INTR 
12510 045000 012737 000340 177776 MOV #340 ,a#PSw ;LOCK OUT INTR 

12511 045006 005012 CLR (R2) ;TURN OFF DL11_ INTR ENAB 

12512 045010 104006 ERROR 6 :WAIT FAILED TO EXECUTE PROPERLY 
ieeiz 045012 000424 BR 8$ GO EXIT THIS TEST 

12515 045014 042712 000100 4$: BIC #100, (R2) TURN OFF DL11 INTR ENAB 

12516 045020 022716 045000 CMP #2$+2, (SP) :DID WAIT GET FETCHED ?? 

E34 045024 001402 BEQ 6$ ;BR IF YES 

12519 045026 104006 ERROR 6 ;WAIT NOT FETCHED PROPERLY 

2344 045030 000415 BR 8$ 3GO EXIT THE TEST 

12522 045032 022766 000151 000002 6%: CMP #151,2(SP) ;D1D “WAIT'’ ALTER THE PSW ?? 
at 045040 001411 BEQ 8$ ;BR IF YES 

12525 045042 012704 000151 MOV #151,R4 :CR4] = S/B PSW 

12526 045046 016603 000002 MOV 2(SP),R3 ;CR3] = WAS PSW 

12527 045052 012702 177776 MOV #PSW,R2 sDEST = PSwW 

12528 045056 104001 7$: ERROR 1 ;"WAIT'’ ALTERED THE PSw 

‘soe. 045060 000401 BR 8$ ;GOT TO EXIT TEST 

424 4 045062 104006 9$: ERROR 6 ;DL11 FAILED TO SET READY ON TIME 
12533 045064 010506 8$: MOV R5,SP sRESET THE SP 

12534 045066 005037 177776 CLR aaPSw ;CLEAR OUT THE PSW 

12535 045072 005012 CLR (R2) ;TURN OFF DL11 INTR. 

12536 045074 012737 000066 000064 MOV #66 ,a#64 RESTORE DL11 VECTOR WITH TRAPCATCHER 
p34 045102 005037 000066 CLR a#66 

12539 petererererererrrrtrtrererrrrrtrrererreeeeeeeeReKeKeeeeeeR eee 
12540 eTEST 647 WAIT INSTRUCTION TEST - CPSw) = 010 

12541 Seeeeeee eee ee eee eee eee eee rere eereeKeKeeeeeeeeKeeeeeeteeeeeee 
12542 045106 181647: 

12543 045106 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
12544 045110 012700 000647 MOV #647,R0 :;LOAD RO WITH TEST NUMBER 

12545 045114 013701 045200 MOV a#2$,R ;LOAD R1 WITH TEST INSTRUCTION WORD 
12546 045120 010605 MOV SP,R5 ;SAVE THE SP 

12547 045122 010737 001010 MOV PC ,a#$LPERR :SET ERROR LOOP ADDRESS 

12548 045126 012702 177564 1$: MOV #XCSR,R2 ;R2 POINT TO DL11 XCSR 

12549 045132 012737 045216 000064 MOV #4$ 0864 :60 TO 4$ - DL11 INTR, 

12550 045140 012737 000200 000066 MOV #200 ,a#66 sAT LEVEL 

12551 045146 010506 MOV R5,SP RESET SP FOR ERROR LOOP 

12552 045150 005012 CLR (Re) sINIT DL11 XCSR 

pitt, 045152 005005 CLR R3 :INIT TIMER 

12555 045154 105712 3$: TSTB (R2) ;DL11 XMIT READY SET ?? 

12556 045156 100403 BMI 5$ 7BR IF YES 

12557 045160 005303 DEC R3 ;COUNT THE TIMER 

12558 045162 001574 BNE 3$ 7BR IF NO TIMEOUT 

5 44 045164 000437 BR 9$ ;GO REPORT TIMEOUT 
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1647 WAIT INSTRUCTION TEST - 


5$: 


23: 


4$: 


6$: 


7$: 


9$: 
8$: 


CLR 
ccc 
BISB 
WAIT 


aePSw 
#100, (R2) 


#340 ,aaPSW 
(R2) 

6 

8$ 


#100, (R2) 
#2$+2,(SP) 
6$ 


6 

8% 
#010,2(SP) 
8$ 
#010,R4 
2(SP),R3 
rms 
8$ 


753 PAGE 234 


CPSw} = 010 

7SET PSw PRTY BITS TO LEVEL 0 
3N:C=0000 

sENAB. DL11 INTR = N:C=1000 
TEST THE WAIT-GO TO 4$ ON INTR 
;LOCK OUT INTR 

TURN OFF DL11 INTR ENAB 

WALT FAILED TO EXECUTE PROPERLY 
:GO0 EXIT THIS TEST 

; TURN OFF DL11 INTR ENAB 

3D1D WAIT GET FETCHED ?? 

;BR IF YES 


;WAIT NOT FETCHED PROPERLY 
3G0 EXIT THE TEST 


7D1D “WAIT’' ALTER THE PSW ?? 
R IF NO 


3CR4) = S/B PSW 
3CR3) = WAS PSwW 
;DEST 


SDEST = PSW 
:WALT" ALTERED THE PSW 
:GOT TO EXIT TEST 


3;DL11 FAILED TO SET READY ON TIME 


RESET THE SP 

;CLEAR OUT THE PSW 

TURN OFF DL11 INTR. 

RESTORE DL11 VECTOR WITH TRAPCATCHER 


ppeewerreeerreereeerreretrreerreeeeeeeeeeeeeeeeeReeeeeeeAA eRe eee 


BR PRIORITY ARBITRATION TEST - LEVEL 1 USING LINE CLK 


z*TEST 650 


-seeeerrererereerererrererrrertrrereeeeeteeeeeeeeKeeeeeeee eee Eee 


1S1650: 


2%: 


#650,R0 
a#2$,R1 


SP,R5 

PC ,a#SLPERR 
#LKCSR,R2 
#4$,a#100 
#340,a#102 


R4 
#40,a#PSW 


#100, (R2) 


R4 
72 


CALL THE SCOPE LOOP UTILITY 
:;LOAD RO WITH TEST NUMBER 
;LOAD R1 WITH TEST INSTRUCTION WORD 
SAVE THE SP 

SET ERROR LOOP ADDRESS 

:R2 POINTS TO LINE CLK CSR 
s1F INTR OCCURS - GO TO 4$ 
sWITH CPU PRIORITY AT LEVEL 7 
;RESET SP FOR ERROR LOOPING 
INITIALIZE R4& AS TIMER 

:SET CPU PRIORITY TO LEVEL 1 
:SCOPE SYNC 


ENABLE LINE CLK INTERRUPTS 


;COUNT THE TIMER = LCLK SHOULD PREVENT 
TIMER FROM GETTING BACK 10 000000 


SEQ 0233 


neh 045400 104006 3$: ERROR sLINE CLK FAILED TO INTR AT LEVEL 1 


B 3 % 
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COKDAD.P11 «11-SEP-79 13:31 1650 BR PRIORITY ARBITRATION TeST - LEVEL 1 USING LINE CLK SEQ 0234 
12617 

12618 045374 042712 000100 Bilt #100, (R2) s TURN OFF THE INTERRUPT ENABLE 

6 

12621 045402 042712 000100 4$: BIC #100, (R2) ; TURN OFF INTR. ENABLE 
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CQKDAD.P11 11-SEP-79 13:31 1650 BR PRIORITY ARBITRATION TEST - LEVEL 1 USING LINE CLK SEQ 0235 
12622 045406 012737 000102 000100 MOV —s- #102, #100 RESTORE TRAP CATCHER IN THE VECTOR 
12623 045414 005037 000102 CLR are 

12624 045420 010506 MOV —s RS, SP RESET THE SP 

12625 045422 005037 177776 CLR saa PSw SET CPU PRIORITY BACK TO LEVEL 0 
12627 ppeeteeerererereerrereererererererereeeererrrrerererereerereereee 
12628 Z*TEST 651 BR PRIORITY ARBITRATION TEST - LEVEL 2 USING LINE CLK 
12629 “eeeeeereerererereeerereererererererererenaeeeeekeneerereretenee 
12630 045426 1§1651: 

12631 045426 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

12632 045430 012700 000651 MOV —s-#651, RO :;LOAD RO WITH TEST NUMBER 

12633 045434 013701 045502 MOV av2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12634 045440 010605 MOV SP,RS 3SAVE THE SP 

12635 045442 010737 001010 MOV PC ,a#SLPERR SET ERROR LOOP “DDRESS 

12636 0454466 012702 177546 18: MOV #LKCSR,R2 :R2 POINTS TO LINE CLK CSR 

12637 045452 012737 045520 000100 MOV #4$,a#100 s1f INTR OCCURS - GO TO 4$ 

12638 045460 012737 000340 000102 MOV —s-«# 340, #102 WITH CPU PRIORITY AT LEVEL 7 

12639 045466 010506 MOV R5,SP sRESET SP FOR ERROR LOOPING 

12640 045470 005004 CLR R4 sINITIALIZE R4& AS TIMER 

12661 045472 012737 000100 177776 MOV = #100, awPSw :SET CPU PRIORITY TO LEVEL 2 

soy 045500 000257 ccc > SCOPE SYNC 

scent 045502 052712 000100 23: BIS #100, (R2) sENABLE LINE CLK INTERRUPTS 

12646 045506 005304 DEC RG ;COUNT THE TIMER = LCLK SHOULD PREVENT 
+ oer 045510 001376 BNE 72 [TIMER FROM GETTING BACK TO 000000 
12649 045512 042712 000100 BIC #100, (R2) > TURN OFF THE INTERRUPT ENABLE 
at 045516 104006 3$: ERROR 6 LINE CLK FAILED TO INTR AT LEVEL 2 
12652 0465520 042712 000100 4$: BIC #100, (R2) ;TURN OFF INTR. ENABLE 

12653 045524 012737 000102 000100 MOV —s- #102. #100 RESTORE TRAP CATCHER IN THE VECTOR 
12654 045532 005037 000102 CLR = awl02 

12655 045536 010506 MOV —s- RS SP RESET THE SP 

scene 045540 005037 177776 CLR awPSw :SET CPU PRIORITY BACK TO LEVEL 0 

6 

12658 : peeeeerrereereeererereererrreereeerererereoeereeereRerNreTeTeees 
12659 TeTEST 652 BR PRIORITY ARBITRATION TEST - LEVEL 3 USING LINE CLK 
12660 -ReeeeeeeeeereeeeeereeeeteteerrerereeeeRereRetenereeereneeeeeeene 
12661 045544 181652: 

12662 045544 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

12663 045546 012700 000652 MOV #652,R0 >; LOAD RO WITH TEST NUMBER 

12664 045552 013701 045620 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
12665 045556 010605 MOV SP,R5 ;SAVE THE SP 

12666 045560 010737 001010 MOV -—s- PC, a#SLPERR SET ERROR LOOP ADDRESS 

12667 045564 012702 177546 18: MOV MLK SR R2 :R2 POINTS TO LINE CLK CSR 

12668 045570 012737 045636 000100 MOV #4$,a#100 s1F INTR OCCURS - GO TO 4$ 

12669 045576 012737 000340 000102 MOV «#340, #102 WITH CPU PRIORITY AT LEVEL 7 

12670 045604 010506 MOV R5,SP ;RESET SP FOR ERROR LOOPING 

12671 045606 005004 CLR RG sINITIALIZE R& AS TIMER 

12672 065610 012737 000140 177776 MOV #140,a#PSW :SET CPU PRIORITY TO LEVEL 3 

12673 045616 000257 eae SCOPE SYNC 

674 
12675 045620 052712 000100 2s: BIS #100, (R2) ENABLE LINE CLK INTERRUPTS 


12677 045624 005304 DEC RG COUNT THE TIMER = LCLK SHOULD PREVENT 
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CQKDAD.P11 11-SEP-79 13:31 1652 BR PRIORITY ARBITRATION TEST - LEVEL 3 USING LINE CLK SEQ 9236 
1ers 045626 001376 BNE 72 ; TIMER FROM GETTING BACK TO 000000 
2680 045630 042712 000100 BIC #100, (R2) ;TURN OFF THE INTERRUPT ENABLE 
‘Sea 045634 104006 3$: ERROR 6 LINE CLK FAILED TO INTR AT LEVEL 3 
12683 045636 042712 000100 4$: BIC #100, (R2) 7 TURN OFF INTR. ENABLE 
12684 045642 012737 000102 000100 MOV #102,a#100 ;RESTORE TRAP CATCHER IN THE VECTOR 
12685 045650 005037 000102 CLR awi0e 
12686 045654 010506 MOV R5,SP sRESET THE SP 
Hor 045656 005037 177776 CLR aePSw ;SET CPU PRIORITY BACK TO LEVEL 0 
12689 ppeeeerereereereeerreeerereereeereerterererteneeeeeeeeereKeeeTTee 
12690 s*TEST 653 BR PRIORITY ARBITRATION TEST = LEVEL 4 USING LINE CLK 
12691 speeererererererereerrerererertrrrreeeKeRKeRKeeKeerereeerereeeeee 
12692 045662 TST653: 
12693 045662 000004 SCOPE ;CALL_ THE SCOPE LOOP UTILITY 
12694 045664 012700 000655 MOV #653,R0 ;;LOAD RO WITH TEST NUMBER 
12695 045670 013701 045736 MOV a#2s,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12696 045674 010605 MOV SP,R5 ;SAVE THE SP 
12697 045676 010737 001010 MOV PC ,a#$LPERR :SET ERROR LOOP ADDRESS 
12698 045702 012702 177546 1$: MOV #LKCSR,R2 ;R2 POINTS TO LINE CLK CSR 
12699 045706 012737 045754 000100 MOV #4$,a#100 :1F_INTR OCCURS - GO TO 4$ 
12700 045714 012737 000340 000102 MOV #340,a#102 sWITH CPU PRIORITY AT LEVEL 7 
12701 045722 010506 MOV R5,SP ;RESET SP FOR ERROR LOOPING 
12702 045724 005004 CLR R4 s INITIALIZE R& AS TIMER 
12703 045726 012737 000200 177776 MOV #200,a#PSw ;SET CPU PRIORITY TO LEVEL 4 
sie 045734 000257 ccc :SCOPE SYNC 
sree 045736 052712 000100 2$: BIS #100, (R2) sENABLE LINE CLK INTERRUPTS 
12708 045742 005304 DEC R4 ;COUNT THE TIMER = LCLK SHOULD PREVENT 
4 AH 045744 001376 BNE 72 ; TIMER FROM GETTING BACK TO 000000 
12711 065746 042712 000100 BIC #100, (R2) ;TURN OFF THE INTERRUPT ENABLE 
eg 045752 104006 3$: ERROR 6 sLINE CLK FAILED TO INTR AT LEVEL 4 
12714 0465754 042712 000100 4$: BIC #100, (R2) ; TURN OFF INTR. ENABLE 
12715 045760 012737 000102 000100 MOV #102,a#100 sRESTORE TRAP CATCHER IN THE VECTOR 
12716 045766 005037 000102 CLR awioe 
12717 045772 010506 MOV R5,SP ;RESET THE SP 
5 At 045774 005037 177776 CLR aaPsw ;SET CPU PRIORITY BACK TO LEVEL 0 
12720 pet eeeeeeerererrereerrerrererertererereretereteeetteeererereneeee 
12721 s*TEST 654 BR PRIORITY ARBITRATION TEST = LEVEL 5 USING LINE CLK 
12722 speeeeererereerereeererrreeeeeeerererererteeeeeeeKeeeeReR eee eee 
12723 046000 TST654: 
12724 046000 000004 SCOPE sCALL_THE SCOPE LOOP UTILITY 
12725 046002 012700 000654 MOV #654,R0 ;;LOAD RO WITH TEST NUMBER 
12726 046006 013701 046054 MOV av2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
12727 046012 010605 MOV SP,R5 :SAVE THE SP 
12728 046014 010737 001010 MOV PC ,a#SLPERR SET ERROR LOOP ADDRESS 
12729 046020 012702 177546 1$: MOV #LKCSR,R2 :R2 POINTS TO LINE CLK CSR 
12730 046024 012737 046072 000100 MOV #4$,a#100 ;1F_INTR OCCURS - GO TO 4$ 
12731 046032 012737 000340 000102 MOV #340,a#192 sWITH CPU PRIORITY AT LEVEL 7 
12732 0460460 010506 MOV R5,SP sRESET SP FOR ERROR LOOPING 
12733 046042 005004 CLR R4 sINITIALIZE R4& AS TIMER 
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CQKDAD.P11 11-SEP-79 13:31 1654 BR PRIORITY ARBITRATION TEST - LEVEL 5 USING LINE CLK SEQ 0237 
12734 0466044 012737 000240 177776 MOV #240,a#PSW ;SET CPU PRIORITY TO LEVEL 5 

iste 046052 000257 ccc ;SCOPE SYNC 

iste 046054 052712 000100 23: BIS #100, (R2) sENABLE LINE CLK INTERRUPTS 

12739 046060 005304 DEC RG sCOUNT THE TIMER = LCLK SHOULD PREVENT 
Soar 046062 001376 BNE 72 ; TIMER FROM GETTING BACK TO 000000 
12742 046064 042712 000100 BIC #100, (R2) ; TURN OFF THE INTERRUPT ENABLE 

5 046070 104006 3$: ERROR 6 LINE CLK FAILED TO INTR AT LEVEL 5 
12745 046072 042712 000100 4$: BIC #100, (R2) ;TURN OFF INTR. ENABLE 

12746 046076 012737 000102 000100 MOV #102,a#100 RESTORE TRAP CATCHER IN THE VECTOR 
12747 046104 005037 000102 CLR avi02 

12748 046110 010506 MOV R5,SP sRESET THE S 

Te 046112 005037 177776 CLR aaPsu sSET CPU PRIORITY BACK TO LEVEL 0 
12751 peeeeeererreereerrereerererererereeeeereKeeAeKeKeeKeeeKeeeEeeS 
12752 LSTEST 655 BR PRIORITY ARBITRATION TEST - LEVEL 6 USING LINE CLK 
12753 : eeereecereerreeeteeeerererterererrererreneetreneereeeneerrerere 
12754 046116 TST655: 

12755 046116 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

12756 046120 012700 000655 MOV #655,R0 7;LOAD RO WITH TEST NUMBER 

12757 046124 013701 046204 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
12758 -SBTTL USER CONTROLLED BREAKPOINT -- B1T13 

12759 046130 032737 020000 063234 BIT #B1113,a#BPTLOC ;BREAKPOINT HALT SET ?? 

12760 046136 001401 BEQ e 7BR IF NOT 

12761 046140 000000 HALT sBREAK-DEPRESS CONTINUE TO CONTINUE 
12762 046142 010605 MOV SP RS ;SAVE THE SP 

12763 046144 010737 001010 MOV PC ,@#SLPERR :SET ERROR LOOP ADDRESS 

12764 046150 012702 177546 1$: MOV #LKCSR,R2 3R2 POINTS TO LINE CLK CSR 

12765 046154 012737 046216 000100 MOV #4$,a#100 s1F INTR OCCURS - GO 10 4$ 

12766 046162 012737 000340 000102 MOV #340,a#102 WITH CPU PRIORITY AT LEVEL 7 

12767 046170 010506 MOV R5,SP sRESET SP FOR ERROR LOOP 

12768 046172 005004 CLR R4 : INITIALIZE R4 AS TIMER 

12769 046174 012737 000300 177776 MOV #300,a¢PSu :SET CPU PRIORITY TO LEVEL 6 

sr 046202 000257 ccc :SCOPE SYNC 

3463 046204 052712 000100 2$: BIS #100, (R2) sENABLE INTERRUPTS 

12774 046210 005304 DEC RG :COUNT UNTIL CR4)] = 000000 - THEN 
12275 046212 001376 BNE "a ;CONTINUE = NO INTERRUPT SHOULD OCCUR 
ere 046214 000403 BR 6$ 60 TO EXIT = ALL OK 

12778 046216 042712 000100 4$: BIC #100, (R2) : TURN OFF THE INTR ENABLE 

444 046222 104006 3$: ERROR 6 :INTR OCCURRED WITH CPU AT LEVEL 6 
12781 046224 042712 000100 6$: BIC #1C0,(R2) ; TURN OFF INTR ENABLE 

12782 046230 012737 000102 000100 MOV #1C2,a#100 RESET THE TRAP CATCHER IN THE VECTOR 
12783 046236 005037 000102 CLR avid2 

12784 046242 010506 MOV R5,SP ;RESET SP JUST IN CASE 

12785 046244 005037 177776 CLR aaPSw :SET CPU PRIORITY BACK TO LEVEL 0 
cree ppeeeeeeeererererererrereeeeerererterererererereneeeseeeeereeTE TS 
12788 :*TEST 656 BR PRIORITY ARBITRATION TEST - LEVEL 7 USING DLI1 
12789 ppeeeerecercereevereereeveuevereeereerereseeerenenetereneEeneeeTe 
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CQKDAD.P11 =: 11-SEP-79 13:31 1656 BR PRIORITY ARBITRATION TEST - LEVEL 7 USING DL11 SEQ 0238 
12790 046250 1S1656: 

12791 046250 04 SCOPE CALL THE SCOPE LOOP UTILITY 

12792 046252 012700 000656 MOV —- #656, RO [LOAD RO WITH TEST NUMBER 

12793 046256 013701 046324 MOV = a#2$- RI LOAD RI WITH TEST INSTRUCTION WORD 
12794 046262 010605 MOVs SP RS SAVE THE SP 

12795 046264 010737 001010 MOV —- PC a#SLPERR SET ERROR LOOP ADDRESS 

12796 046270 012702 177564 18: MOV ss #XCSRR2 :R2 POINTS TO DL11 XCSR 

12797 046274 012737 046336 000064 MOV —s#48, 0864 Z1F_INTR OCCURS - GO TO 4$ 

12798 046302 012737 000340 000066 MOV «#340, #66 :WITH CPU PRIORITY AT LEVEL 7 

12799 046310 0105 MOV —sR'5, SP RESET SP FOR ERROR LOOP 

12800 046312 005004 CLR RG SINITIALIZE RG AS TIMER 

12801 046314 012737 000340 177776 MOV #340, aaPSw SET CPU PRIORITY TO LEVEL 7 

12802 046522 000257 ade SCOPE SYNC 

12804 046524 052712 000100 28: BIS #100, (R2) ENABLE INTERRUPTS 

12806 046330 005304 DEC — RG COUNT UNTIL CR4] = 000000 - THEN 
12807 046332 001376 BNE 72 CONTINUE = NO INTERRUPT SHOULD OCCUR 
12808 046354 000405 BR é$ :G0 10 EXIT = ALL OK 

12810 046336 042712 000100 4$: BIC —s- #100, «R2) TURN OFF THE INTR ENABLE 

12811 046342 104006 3$: ERROR 6 ZINTR OCCURRED WITH CPU AT LEVEL 7 
12813 046344 042712 000100 6$: BIC = #100, (R2) TURN OFF INTR ENABLE 

12814 046350 012737 000066 000064 MOV #66 ,a#64 ;RESET THE TRAP CATCHER IN THE VECTOR 
12815 046356 005037 000066 CLR = a#66 

12816 046362 010506 MOV R5,SP ;RESET SP JUST IN CASE 

$e 34 046364 005037 177776 CLR aaPSw :SET CPU PRIORITY BACK TO LEVEL 0 
12819 3 seeeeeerrrererererererererrerereretereeerAeeAeeeReeeKeeeeeeAeees 
12820 Z*TEST 657 “CLR as#PSW'' ALLOWS IMMEDIATE BR-BG-INTR SEQUENCE 
12821 THIS TEST VERIFIES THAT IF A "BR' REQUEST IS PENDING WHEN A CLR aa@PSw"’ 
12822 31S EXECUTED TO LOWER THE CPU PRIORITY, THE REQUEST 1S GRANTED BEFORE 
12823 EXECUTION OF THE INSTRUCTION FOLLOWING THE "CLR" 

12824 Ree eekeeeeeeeekeeeeeeteeeeeetaeReekekererereeeees 
12825 046370 1§1657: | 

12826 046370 000004 SCOPE CALL THE SCOPE LOOP UTILITY 

12827 046372 012700 000657 MOV —s-#657,RO LOAD RO WITH TEST NUMBER 

12828 046376 013701 046470 MOVs a#28.-R 1 [LOAD R1 WITH TEST INSTRUCTION WORD 
12829 046402 012702 177546 MOV —s ALK SR, R2 R2 POINTS TO LINE CLK CSR 

12830 046406 010605 MoV —s SP R5 SAVE THE SP 

12831 046410 010737 001010 MOV PC a#SLPERR :SET ERROR LOOP ADDRESS 

12832 046414 012737 046476 000100 18: MOV ss #4$,, #100 SET UP LCLK VECTOR TO GO 10 4$ 
12833 046422 012737 000300 000102 mov —-#300,,aw102 

1 046430 010506 MOV —sR'5, SP ;RESET THE SP FOR ERROR LOOPING 
12835 046432 005004 CLR RA PINITIALIZE TIMER FO KW 

12836 046434 005003 CLR RB CLEAR SOFTWARE FLAG 

12837 046436 012737 000340 177776 MOV —s-# 340, aaPSw LOCK OUT ALL INTRS 

12838 046444 052712 000100 BIS #100, (R2) sENABLE LCLK INTRS 

12839 046450 042712 000200 BIC #200. (R2) SCLEAR LINE CLOCK READY 

12840 046654 105712 118:  TSTB  (R2) ZLCLK READY TO INTR ?? 

12841 046656 100403 BMI 12$ BR IF YES 

12842 046460 005304 DEC RG COUNT THE TIMER 

12843 046462 001374 BNE 118 BR IF NO TIMEOUT 

12844 046464 000411 BR 6$ 3GO REPORT TIMEOUT 


12845 046466 000257 nr: Tee :SCOPE SYNC 
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13:53 PAGE 240 
“CLR @#PSw' ALLOWS IMMEDIATE BR-BG-INTR SEQUENCE 


23: CLR aePsw sALLOW INTRS = LCLK SHOULD INTERRUPT 
sBEFORE FETCHING NEXT INSTRUCTION 

COM R3 :SHOULD NOT BE FETCHED 

4$: CLR (R2) :DISABLE THE LCLK INTR 
TST R3 :D1D0 SOFTWARE FLAG GET SET ?? 
BEQ es sBR IF NOT - IT WORKED OK 

3$: ERROR 6 sLCLK FAILED TO INTR ONTIME 
BR 8% 360 EXIT 

6$: CLR (R2) sDISABLE LCLK INTR 

5$: ERROR 6 sLINE CLK TIMED OUT 

8$: MOV R5,SP sRESET THE SP 
MOV #102,a#100 sRESTORE THE LINE CLK TRAPCATCHER 
CLR a#i02 


p_eeeeeererereereeeeeeeeerereeeerereenenenereeneenererenereernete 
:*TEST 660 “BRO VS BR4'’ PRIORITY ARBITRATION TEST 

THIS TEST VERIFIES THAT IF BOTH A ‘'BR4'’ AND A ‘BRO’ REQUEST ARE 
sPENDING WHEN THE CPU PRICRITY 1S LOWERED TO ALLOW INTRS. THAT "BRO" 
[REQUEST 1S GRANTED FIRST EVEN THOUGH THE ‘'BR4'' REQUEST MAY HAVE 
sOCCURRED FIRST 


sr eeeeereerreerereereerereeeererererererenerAeeeAKeeeeeeereeeneese 


TST660: 


118: 


12$: 


13$: 


Ss 
PC ,a#SLPERR 


#LKCSR,R2 
#XCSR,R5 
#4$,a#100 


#300,a#102 


#8S ,a#64 
#200 ,a#66 


R5,SP 
#340 ,a#PSW 


aeMBUF 0 
init 


#100. (R3) 
(R 


RG 

#100, (R2) 
#200, (R2) 
(R2) 

14% 

RG 

13$ 

7$ 


;CALL THE SCOPE LOOP UTILITY 

3;LOAD RO WITH TEST NUMBER 

;LOAD R1 WITH TEST INSTRUCTION WORD 
SAVE THE SP 

;SET ERROR LOOP ADDRESS 

;R2 POINTS TO LINE CLK CSR 

7R3 POINTS TO DLI! XCSR 

;SET UP THE LCLK VECTOR - GO TO 4$ 


;SET UP THE DL11 VECTOR - GO 10 8% 


RESET SP FOR ERROR LOOPING 
;LOCK OUT ALL INTRS 
: INIT TIMER 

;CLEAR DL11 INTR FLAG 

; INIT TIMER 

SENABLE DL11 XAT B ste 
;XMI1T READY SET 

:BR IF YES 

:COUNT THE TIMER 
7;BR IF NO TIMEOUT 

;GO REPORT TIMEOUT FOR DL11 


INIT THE TIMER AGAIN 

ENABLE LCLK INTRS 

;CLEAR THE LINE CLOCK READY Bil 
;LCLK READY TO INTR 

;BR IF YES 

;COUNT THE TIMER 

;BR 1F NO TIMEQUT 

;GO REPORT LINE CLK TIMEOUT 
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“BRO VS BR4"’ PRIORITY ARBITRATION TEST 


148: ccc 


23: 


4$: 


3$: 


6$: 


8$: 


5$: 


7$: 


9$: 


;SCOPE SYNC 


aaPsw sALLOW INTRS - KW SHOULD INTR FIRST 
a*MBuUFO ;SET SOFTWARE FLAG IF FETCHED 
at sDISABLE BOTH INTERRUPTS 
aeMBuFO 7D1D SOFTWARE FLAG GET SET ?? 

6$ :BR IF NOT 

6 sLINE CLK INTR OCCURRED 100 LATE 
9$ 3G0 TO EXIT 

aaMBuUF | :DID DL11 SOFTWARE FLAG SET ?? 
9$ ; IF NOT 

R3,R2 ;FOR CORRECT DESTINATION TYPOUT 
6 7DL11 INTERRUPTED THE KW11 

9$ 3G0 TO EXIT TEST 

aeMBuUF 1 sFLAG THE DL11 INTR 

ah “DISABLE BOTH INTR ENABLES 

R3,R2 sFOR CORRECT DESTINATION TYPOUT 
6 :DL11 SHOULD NOT HAVE INTERRUPTED 
9$ 3G0 EXIT TEST 

a sDISABLE THE INTR ENABLES 

R3,R2 sFOR CORRECT DESTINATION TYPOUT 
6 :DL11 TIMEOUT 

9$ :G0 TO EXIT 

ae :DISABLE INTR ENABLES 

6 sKW11 TIMEOUT 

R5,SP :RESET THE SP 

aaPsw ;RESET THE CPU PRIORITY 
#102,a#100 sRESTORE LCLK VECTOR 

aaio2 

#66 ,a864 sRESTORE THE DL11 XMIT VECTOR 
a#66 


RHETT Ke eee ekeeeeeereeeeeeereeeeretes 


J//7/7717177/ COMBINED INSTRUCTICN EXERCISER SECTION ////////////7/ 


eeeeerererereeeeerereeeeeeereeeererereeeeeeeeenereteeeereeteeeeereeeeeese 


pp eereereerecerererereererrerereeerererreneeeereraateneteneserese 


i§ 


TEST 661 


“BPT'’ TRAP LINKAGE TEST 


*eeeeertereeeeeeeeeereeeeereeereeeeeeeeeeeettereketeeeeeteeetetese 


1661: 


CALL THE SCOPE LOOP UTILITY 


#661,R0 :;LOAD RO WITH TEST NUMBER 
a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
SP,R5 SAVE THE SP 


SEQ 0240 


= 
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CQKDAD.P11 11-SEP-79 13:31 1661 “BPT'’ TRAP LINKAGE TEST SEQ 0241 
12958 047044 010737 001010 MOV PC ,a#SLPERR 7 SET re LOOP ADDRESS 

12959 047050 012737 047066 000014 18: MOV #4$,a814 :G0 TO 4$ ON ''BPT'’ TRAP 

12960 047056 010506 MOV R5,SP RESET THE oS FOR ERROR LOOPING 
Hf +d 047060 000257 ccc ;SCOPE SYNC 

Seer 047062 000005 2$: BPT ;TEST THE “‘BPT'' = GO TO 4$ 

fH 047064 104005 3$: ERROR 5 7;BPT FAILED TO TRAP 

12967 047066 010506 4$: MOV R5,SP ;RESET THE SP 

icoes 047070 012737 000016 000014 MOV #16,a814 sRESTORE THE VECTOR 

12970 ppeeeeeerererereerrereeerrereereerereeeerereeeeeeretenereReeeTeTe 
12971 S*TEST 662 RED ZONE OVERFLOW TEST - MOV R,-(SP) 

12972 peeerererereeeerrererrererrreererererertereeerenreneeteeereeeeeS 
12973 047076 1§1662: 

12974 047076 000004 SCOPE Ace THE SCOPE LOOP UTILITY 
12975 047100 012700 000662 MOV #662 ,,RO ;;LOAD RO WITH TEST NUMBER 

12976 047104 013701 047144 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
12977 047110 010605 MOV SP,R5 ;SAVE SP 

12978 047112 013704 000004 MCV a#G ,R4 ;SAVE T.0. VECTOR 

12979 047116 013703 000336 MOV a#336,R3 ;SAVE VECTOR AT 336 

12980 047122 012737 047162 000004 MOV #4$,a86 ;GO TO 4$ ON OVFLW 

12981 047130 012737 125252 000336 MOV #125252,a#336 =; INIT. [336] 

12982 047136 012706 000340 MOV #340,SP :SET SP TO CAUSE RED ZONE TRAP 
Seas 047142 000257 ccc ;SCOPE SYNC 

‘sees 047144 010046 2s: MOV RO,-(SP) FORCE RED ZONE TRAP = GO TO 4$ 
12987 047146 010437 000004 MOV R4 084 RESTORE 1.0. VECTOR 

12988 047152 010637 001074 MOV SP ,a#SREGS 7SAVE BAD SP FOR PRINTING 

12989 047156 010506 MOV R5.SP ;RESET SP FOR ERROR CALL 

Soot 047160 104005 3$: ERROR 5 >MOv FAILED TO CAUSE TRAP 

12992 047162 010437 000004 4%: MOV R4,aa4 RESTORE 1.0. VECTOR 

12993 047166 022706 000000 CMP #0,SP ;CSP)=0? 

eons 047172 001404 BEQ 6% :BE IF YES 

12996 047174 010637 001074 MOV SP ,a#$REGS SAVE BAD SP FOR PRINTING 

12997 047200 010506 MOV RS,SP RESET SP FOR ERROR CALL 

$34 047202 104005 5$: ERROR 5 7SP NOT BEING JAMMED TO 4 

13000 047204 022737 125252 000336 6%: CMP #125252,a#336  ;DID PUSH OCCUR IN YELLOW ZONE? 
fd 047212 001404 BEQ 8$ :BR IF NOT 

13003 047214 010637 001074 MOV SP, a#SREGS >SAVE BAD SP FOR PRINTING 

13004 047220 010506 MOV R5,SP sRESET SP FOR ERROR CALL 

fs 044 047222 104005 7$: ERROR 5 ;MOV PUSHED INTO YELLOW ZONE 
13007 047224 010337 000336 8$: MOV R3,a#336 ;RESTORE VECTOR 336 

13008 047230 010506 MOV R5,SP ;RESET SP 

foe ppeeeeerereceeceenerererereererrerererentenereeeerereerererereee® 
15011 s*TEST 665 YELLOW ZONE OVERFLOW TEST - MOV R,-(SP) 

13012 sseeecececrecorcererccececcenececeeeescessessseesesseaeeeeeseseTe 
130185 047232 181663: 
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YELLOW ZONE OVERFLOW TEST - MOV R,-(SP) 


SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #663,R0 :sLOAD RO WITH TEST NUMBER 
MOV a#23.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP_RS :SAVE SP 
MOV #376 .R2 ‘R2 POINTS TO STACK 
MOV ans :SAVE 1.0. VECTOR 
MOV #48. ans :0N OVFLW - GO TO 4$ 
MOV #400,SP :SET SP TO CAUSE OVFLW 
CCC :SCOPE SYNC 
2$: MOV RO,-(SP) sFORCE STACK OVFLW - GO TO 4$ 
MOV RG, ans :RESTORE 1.0. VECTOR 
MOV SP. aNSREGS “SAVE BAD SP FOR PRINTING 
MOV R5,SP “RESET SP FOR ERROR CALL 
38: ERROR 5 “STACK OVFLW FAILED TO TRAP 
4$: MOV RG, ans RESTORE 1.0. VECTOR 
CMP RO. (R2) “DID CROJ GET PUSHED? 
BEQ 6$ “BR IF YES 
MOV SP, aa#SREGS :SAVE BAD SP FOR PRINTING 
MOV RS,SP “RESET SP FOR ERROR CALL 
5$: ERROR 4 “MOV FAILED TO PUSH IN YELLOW ZONE 
6s: TST SP :CSP)=0? 
BNE BS :BR 1F NOT 
MOV SP, a#SREGS :SAVE BAD SP FOR PRINTING 
MOV RS,SP “RESET SP FOR ERROR CALL 
7$: ERROR 5 :RED ZONE INSTEAD OF YELLOW ZONE 
8$: MOV RS,SP :RESET SP 


sp eeeereererereerererrrrrerrerereerreerenenaeaeeneeenAeeKeeeeeeee 


:*TEST 664 YELLOW ZONE OVERFLOW TEST - (CMP RO,-(SP)) 
ppeeeeeeetereererereerereretereee eeeeteneeeeetereKeKeeeTETeRee ee 
TST664: 

¢CALL THE SCOPE LOOP UTILITY 

;LOAD RO WITH TEST NUMBER 

LOAD Rl WITH TEST INSTRUCTION WORD 
;SAVE THE SP 

;SAVE TRAP VECTOR 

MOV sas, on 3:60 TO 4$ IF TRAP SPRUNG 

MOV #400, SP ;SET SP TO PUSH INTO ‘YELLOW ZONE*’ 
ccc ;SCOPE SYNC 


23: CMP RO,-(SP) ; TEST THE CMP - NO TRAP SHOULD OCCUR 
BR 6% :G0 TO EXIT TEST 
4$: MOV RESTORE TRAP VECTOR 


R4 084 

MOV SP ,a#$REGS ;SAVE BAD SP FOR PRINTING 
MOV R5,SP RESET THE SP 

3$: ERROR § ;CMP CAUSED OVERFLOW [RAP 


SEQ 0242 


cs 
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13070 047422 010437 000004 6$: MOV R4,ae4 at THE VECTOR 

eer3 047426 010506 MOV R5,SP SRESET T HE SP 

13073 s teeneceeeeeeeceececereeceeeeceererereereeetecerteeeteceeeeeerte 
13074 s*TEST 665 YELLOW ZONE OVERFLOW TEST - (BIT RO,-(SP)) 

13075 PRAM R AEH TRE RARE RETESET TEETH T ATE RAT TARTAR ARETE ATES 
13076 047430 1S1665: 

13077 047430 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

13078 047432 012700 000665 MOV #665 ,RO 7;LOAD RO WITH TEST NUMBER 

13079 041436 013701 047464 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
13080 047442 010605 MOV keg ;SAVE THE SP 

13081 047444 013704 000004 MOV aa4 ,R4 ;SAVE TRAP VECTOR 

13082 047450 012737 047470 000004 MOV #48. a#4 ;GN 10 4$ If TRAP SPRUNG 

13083 047456 012706 000400 MOV #400, SP :SET SP TO PUSH INTO “‘YELLOW ZONE"’ 
leone 047462 000257 ccc ;SCOPE SYNC 

13086 047464 030046 23: BIT RO,-(SP) sTEST THE BIT - NO TRAP SHOULD OCCUR 
tees 047466 000406 BR 6$ 3G0 TO EXIT TEST 

13090 047470 010437 000004 4$: MOV R484 ;RESTORE TRAP VECTOR 

13091 047474 010637 001074 MOV SP ,a#$REGS ;SAVE BAD SP FOR PRINTING 

13092 047500 010506 MOV R5,SP sRESET THE SP 

frat, 047502 104005 3$: ERROR 5 ;B1T CAUSED OVERFLOW TRAP 

13095 047504 010437 000004 6$: MOV R4 a4 sRESTORE THE VECTOR 

p44 047510 010506 MOV R5,SP ;RESET THE SP 

13098 pLeeeeeoereereeereerereeeteretereeererteeeeeKeReeeeeeeeeKAeAAeEe 
13099 s*TEST 666 YELLOW ZONE OVERFLOW TEST = (TST =(SP)) 

13100 ppeeeeeereereerereeererereterterentererereeeeKeAKeKeeKeK ee ERE EEE 
13101 047512 TST666: 

13102 047512 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

13103 047514 012700 000666 MOV #666 ,RO LOAD RO WITH TEST NUMBER 

13104 047520 013701 047546 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
13105 047524 010605 MOV SP,R ;SAVE THE SP 

13106 047526 013704 000004 MOV O44 ,R4 SAVE TRAP VECTOR 

13107 047532 012737 047552 000004 MOV #4%$,a#4 ;GO0 10 ag 1F TRAP SPRUNG 

13108 047540 012706 000400 MOV #400, SP 7SET SP TO PUSH INTO “‘YELLOW ZONE'' 
tires 047544 000257 ccc ;SCOPE SYNC 

tit 047546 005746 23: TST -(SP) ;TEST THE TST = NO TRAP SHOULD OCCUR 
ataz 047550 000406 BR 6$ 3G0 TO EXIT TEST 

13115 047552 010437 000004 4$: MOV R4,a84 ;RESTORE TRAP VECTOR 

13116 047556 010637 001074 MOV SP ,a#$REGS ;SAVE BAD SP FOR PRINTING 

13117 047562 010506 MOV R5,SP ;RESET THE SP 

be 047564 104006 3$: ERROR 6 ;TST CAUSED OVERFLOW TRAP 

13120 047566 010437 000004 6$: MOV R4,aa4 sRESTORE THE VECTOR 

13121 047572 010506 MOV R5,SP ;RESET THE SP 

tH ppeeeereerecerererererereeereererererereereerererereerereeseeeete 
13124 s*TEST 667 ODD ADDRESS ERROR TEST = SUB RA,(RB) = (RB) = ODD 
13125 ppeereeeecerererereerererererecerererereneeneeeetereeereeeterenes 
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ODD ADDRESS ERROR TEST - SUB -RA,(RB) - (RB) = ODD SEQ 0244 
13126 047574 TS1667: 
13127 047574 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
13128 047576 012700 000667 MOV #667,R0 ;;LOAD RO WITH TEST NUMBER 
13129 047602 013701 047636 MOV av2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
13130 047606 010605 MOV SPR ;SAVE SP 
13131 047610 010737 001010 MOV PC ,a#SLPERR SET ERROR LOOP ADDRESS 
13132 047614 013704 000004 1$: MOV #4 RG ;SAVE 1.0. VECTOR 
13133 047620 012737 047646 000004 MOV #4$,a#4 ;0N ODD ADDR ERROR - GO TO 4$ 
13134 047626 010506 MOV R5,SP ;RESET SP FOR ERROR LOOP 
13135 047630 012702 000001 MOV #1,R2 :R2 GETS ODD ADDRESS 
EE J 047634 000257 ccc ;SCOPE SYNC 
Hof 047636 160012 28: SUB RO, (R2) FORCE ODD ADDR ERROR = GO TO 4$ 
13140 047640 010437 000004 MOV R4,aa4 ;RESTORE 1.0. VECTOR 
yt dee 047644 104006 3$: ERROR 6 ;0DD ADDR FAILED TO TRAP 
131435 047646 010437 000004 4$: MOV R4 ,aa4 RESTORE 1.0. VECTOR 
13144 047652 010506 MOV R5,SP RESET SP 
tieat 047654 005037 000000 CLR a#0 :CLR LOC. O JUST IN CASE 
13147 pe eeerereeeererererrereererrererererreeeeeeeeeeeeeeeeeeeeeeee ETS 
13148 :*TEST 670 TEST FOR ODD ADDR. ERROR TRAP FOR DEST. DEFERRED MODES 
13149 PpeeeeeeerecereeeerereereeeeeekerererrreeeeeeeeeeeKianeeeeeeeeee 
13150 047660 TST670: 
13151 047660 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
13152 047662 012700 000670 MOV #670,R0 3;LOAD RO WITH TEST NUMBER 
13153 047666 013701 047710 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
13154 047672 012702 063317 MOV #MBUF14+1,R2 ;DEST ADDR=MBUF1+1 (ODD) 
AE 6 047676 012737 047760 000004 MOV #4$,a#4 ;GO TO 4% ON ODA TRAP 
13157 047704 010205 MOV R2,R5 3;CR5] = DEST. ADDR 
if tt 047706 000257 ccc SCOPE SYNC 
Fy 047710 105435 23: NEGB ac(Rr5)+ TEST DM=3 TRAP 
tb 047712 104006 3$: ERROR 6 ;O0DA TRAP NOT SPRUNG 
13164 047714 012705 063321 MOV #MBUF14+3,R5 ;CR5] = DEST. ADDR 
13165 047720 013701 047726 MOV a#20$,R1 ;CR1} = TEST INSTR 
fps 047724 000257 ccc SCOPE SYNC 
itrce 047726 105455 208: NEGB a-(R5) TEST DM=5 TRAP 
HA 047730 104006 5$: ERROR 6 ;ODA TRAP NOT SPRUNG 
13172 047732 010205 MOV R2,R5 ;CR5] = DEST ADDR 
13173 047734 013701 047742 MOV a#21$,R1 ;CR1) = TEST INSTR 
seire 047740 000257 ccc ;SCOPE SYNC 
$4 047742 105475 000000 218: NEGB a0(R5) TEST DM=7 TRAP 
‘tir 047746 104006 7$: ERROR 6 ;ODA TRAP NOT SPRUNG 
1 
13180 047750 012737 061220 000004 MOV #BERR aa ;RESET 1.0. VECTOR 
13181 047756 000403 BR T$1671 3:60 TO SCOPE EXIT 


n 3 
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13182 

13183 047760 062716 000002 4$: ADD #2, (SP) ;MOV RETURN PC AROUND ERROR CALL 
a 047764 000002 RT1 sRETURN TO NEXT SUB-TEST 

13186 sp eeeererereerererrrrrererereererereeeeeeKeeeeeeeAeereRAeeKeeKeee 
13187 :*TEST 671 TEST FOR ODD ADDR ERROR TRAP FOR SOURCE DEFERRED MODES 
13188 s_teeeererereretererreerreerererererereeeteKeeKeKeeeeeneeKeneeee 
13189 047766 181671: 

13190 047766 000004 SCOPE sCALL THE SCOPE LOOP UTILITY 

13191 047770 012700 000671 MOV #671,R0 ‘;LOAD RO WITH TEST NUMBER 

13192 047774 013701 be MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
13193 050000 012702 063317 MOV #MBUF 141,R2 :€R2] = SOURCE ADDR. (ODD) 

ba 012737 050066 000004 MOV #4%,a84 ;:GO TO 4$ ON TRAP 

13196 050012 010205 MOV R2,R5 :(R5] = SOURCE ADDR. 

13197 050014 000257 CCC ‘SCOPE SYNC 

Hf th 050016 113504 23: MOVB Q(R5)+,R4 sTEST SM=3 

od 050020 104006 3$: ERROR 6 sODA TRAP NOT SPRUNG 

13203 050022 012705 063321 MOV #MBUF 1+3,R5 :(R5] = SOURCE ADDR 

13204 050026 013701 050034 MOV a#20$,R1 :CR1] = TEST INSTR 

13205 050032 000257 CCC :SCOPE SYNC 

13207 050034 115504 208:  MOVB a-(RS),R4 sTEST SM=5 

13209 050036 104006 5$: ERROR 6 ;ODA TRAP NOT SPRUNG 

13210 050040 010205 MOV R2,R5 :(R5) = SOURCE ADDR 

13211 050042 013701 050050 MOV av21$.Ri :(R1] = TEST INSTR 

13212 050046 000257 CCC :SCOPE SYNC 

15214 050050 117504 000000 21$: MOVB a0 (RS),R4 STEST SM=7 

44 050054 104006 7$: ERROR 6 :ODA TRAP NOT SPRUNG 

13218 050056 012737 061220 MOV WBERR, aw sRESET 1.0. VECTOR 

15219 050064 000403 BR 1S1672 ::G0 TO SCOPE EXIT 

13221 050066 062716 000002 4$: ADD #2, (SP) :MOVE RETURN PC AROUND ERROR CALL 
13222 050072 000002 RTl “RETURN TO NEXT SUB-TEST 

lesez py_eeeeerererererereeeeereeererereeeeeeneReeeneerRAAeeeeeeTA EAE 
13225 s*TEST 672 TEST FOR ODD ADDR ERROR TRAP FOR JMP DEST DEFERRED MODES 
13226 peeeenrerereeeeeeeerereretetenteeeeeeeteeeeReeeeeeeeeeeeee eee 
13227 050074 11672: 

1322 050074 000004 SCOPE sCALL THE SCOPE LOOP UTILITY 

13229 050076 012700 000672 MOV #672,R0 *:LOAD RO WITH TEST NUMBER 

13230 050102 013701 050124 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 
13231 050106 012702 050177 MOV #6$+3,R2 ‘DEST ADDR = 6$+3 (ODD) 

13252 050112 012737 050202 000004 MOV #4$,a#4 :GO TO 4$ ON ODA TRAP 

13234 050120 010205 MOV R2,R5 :(R5] = DEST ADDR 

15235 050122 000257 CCC “SCOPE SYNC 

13237 050124 000135 28: JMP acRrs)* STEST UMP DM=3 
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13238 

tH! 050126 104006 3$: ERROR 6 sO0DA TRAP NOT SPRUNG IN ROM LOC 153 | 
13241 050130 012705 050177 MOV #6$43,R5 :(R5) = DEST ADDR 

13242 050134 013701 050142 MOV a#20$.R1 :(R1) = TEST INSIR 

A eSez 050140 000257 ccc : SCOPE SYNC 

13245 050142 000155 208: JMP a-(R5) sTEST UMP DM=5 

4 050144 104006 5$: ERROR 6 :O0DA TRAP NOT SPRUNG IN ROM LOC 155 
13249 050146 010205 MOV R2,R5 :CR5] = DEST ADDR 

13250 050150 013701 050156 MOV a#21$,R1 :(R1] = TEST INSTR 

13251 050154 000257 CCC [SCOPE SYNC 

13255 050156 000175 000000 21$: MP a0cRS) sTEST UMP DM=7 

Hatt 050162 104006 7$: ERROR 6 ;0DA TRAP NOT SPRUNG 

13257 050164 012737 061220 000004 Mov WBERR, ae :RESET BUS 1.0. VECTOR 

13258 050172 000420 BR 181678 >;G0 TO SCOPE EXIT 

13260 050174 000000 6S: HALT :CATASTOPHIC ERROR - CPC) QUESTIONABLE. 
13261 050176 000000 HALT :RESTART PROGRAM - DO NOT CONTINUE. 
13262 050200 000000 HALT 

13264 050202 032716 000001 4$: BIT #1, (SP) s TRAP DUE TO OCD PC? 

13265 050206 001003 BNE 8S ‘BR IF YES 

13266 050210 062716 000002 ADD #2, (SP) ‘MOV RETURN PC AROUND ERROR CALL 

Hf rre4 050214 000002 RTl > RETURN TO NEXT SUB TEST 

13269 050216 011603 8$: MOV (SP),R3 :GET ODD PC OFF STACK INTO R3 
13270 050220 062706 000004 ADD #4,SP FIX SP 

4 44 050224 104007 9$: ERROR 7 :PC TRAPPED WITH ODD ADDRESS 

e5rs 050226 012737 061220 000004 MOV #BERR aes ;RESET T.0. VECTOR 

13276 . ppeeeeereerrecerereerrrererrterererereeeneeeereeereeeeKeNeeAA Eee 
13277 s*TEST 673 TEST FOR STACK OFLW FOR DEST MODES 1.2.4, AND 6. 
13278 ppeeeweererrrerrererrtrrererrertrerereseresennteneeeeetenereeeees 
13279 050234 181673: 

13280 050234 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

13281 050236 012700 000673 MOV #673,R0 33 LOAD RO WITH TEST NUMBER 

13282 050242 013701 050266 MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
13283 050246 012737 050400 000004 MOV oP a#4 :G0 T0 ab ON OVFLW TRAP 

13284 050254 010605 MOV RS p 

13285 050256 012702 000376 MOV +36 R2 ‘ist R2 TO SET UP SP TO CAUSE TRAP 
13287 050262 010206 MOV R2,SP :SET UP SP TO CAUSE OVERFLOW 

iesee 050264 000257 ccc sSCOPE SYNC 

335] 050266 005016 23: CLR (SP) sTEST DM1 = SHOULD SPRING TRAP 
13292 050270 010637 001074 MOV SP ,a#SREGS :SAVE BAD SP FOR PRINTING 

13293 050274 010506 MCV RS.SP “RESET SP 
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TEST 


38: ERROR 


MOV 
MOV 
ccc 


208: CLR 


MOV 
5$: ERROR 


21$: CLR 


7$: ERROR 


228: CLR 


9$: ERROR 


4$: MOV 


11-SEP-79 
FOR STACK OFLW FOR 


6 
a#208,R1 
R2,SP 


(SP)+¢ 
SP ,a#SREGS 
~— 


a#21$,R1 
R2,SP 


-(SP) 
SP ,a#SREGS 
R5,SP 


° 


6 


a#22$,R1 
R2,SP 


O(SP) 
SP ,a#SREGS 
R5,SP 


6 


#BERR ,aa4 
TST674 


(SP) ,R4 
#10,R4 
RS,SP 
-(SP) 
R4,-(SP) 


4 
753 PAGE 248 
DEST MODES 1.2.4, AND 6. 


sDM1 FAILED TO CAUSE OVERFLOW TRAP 
:CR1) = . 
;SET UP SP TO CAUSE OVERFLOW 
;SCOPE SYNC 


TEST DM2 = SHOULD SPRING TRAP 


TEST INSTR 


SAVE BAD SP FOR PRINTING 
sRESET SP 
;DM2 FAILED TO CAUSE OVERFLOW TRAP 


;CR1] = TEST INSTR 
;SET UP SP TO CAUSE OVERFLOW 
SCOPE SYNC 


7 TEST DM4 = SHOULD SPRING TRAP 


SAVE BAD SP FOR PRINTING 
RESET SP 
3;DM4 FAILED TO CAUSE OVERFLOW TRAP 


3;CR1) = TEST INSTR. 
SET SP TO CAUSE ERROR 
> SCOPE SYNC 


; TEST DM6 = SHOULD SPRING TRAP 


;SAVE BAD SP FOR PRINTING 
sRESET SP 
;DM6 FAILED TO CAUSE OVERFLOW TRAP 


;RESET BUS T.0. VECTOR 
3:G0 TO SCOPE EXIT - 


;GET RETURN PC OFF STACK 

;MOVE RETURN PC AROUND ERROR CALL 
;RESET SP 

;PUSH NEW PS ON STACK 

:PUSH RETURN PC ON STACK 

:RETURN TO NEXT SUB-TEST 


pp eeeeererereerrererereererrrererererererRerenererenerenereeteeesT 


T®TEST 674 


TEST FOR STACK OVFLW FOR MOV DEST MODES 1.2.4, AND 6. 


sc eeereereererererererereerrerererereerreeereeneReeeeeeReeererete 


1$1674: 


SCOPE 
MOV 


#674,R0 
ares, 


3336 R2 
R2,SP 


CALL THE SCOPE LOOP UTILITY 
+s LOAD RO WITH TEST NUMBER 
LOAD R1 WITH TEST INSTRUCTION WORD 


R1 
*y aes ;60 10 ab a _— OVFLW TRAP 


7 SAV 
USE ne TO SET UP SP TO CAUSE TRAP 


;SET UP SP TO CAUSE OVERFLOW 
SCOPE SYNC 


SEQ 0247 
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23: 


38: 


208: 


5$: 


218: 


7$: 


228: 


9$: 


4$: 
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TEST FOR STACK OVFLW FOR MOV DEST MODES 1,2,4, AND 6. 


RO, (SP) 
SP, aa#SREGS 
R5,SP 


2#208,R1 
R2,SP 


RO, (SP)+ 
SP ,a#SREGS 
R5,SP 


a#21$,R1 
RO,-(SP) 
SP, a#$REGS 
R5,SP 

6 

a#22$,R1 
R2,SP 
RO,O(SP) 
SP ,a#SREGS 
RS,SP 


° 


#BERR ,aa4 
1$1675 


(SP) ,R4& 


R4,-(SP) 


TEST MOV DMI = SHOULD SPRING TRAP 
SAVE BAD SP FOR PRINTING 


RESET SP 
MOV DMI FAILED TO SPRING TRAP 
sCR1) = TEST INSTR 


:SET UP SP TO CAUSE OVERFLOW 
:SCOPE SYNC 


TEST MOV DM2 - SHOULD SPRING TRAP 


SAVE BAD SP FOR PRINTING 
;RESET SP 
7MOV DM2 FAILED TO SPRING TRAP 


3CR1) = TEST INSTR. 
SET UP SP TO CAUSE OVERFLOW 
;SCOPE SYNC 


TEST MOV DM4 = SHOULD SPRING TRAP 


SAVE BAD SP FOR PRINTING 
sRESET SP 
MOV DM4 FAILED TO SPRING TRAP 


sCR1] = TEST INSTR. 
SET UP SP TO CAUSE OVERFLOW 
SCOPE SYNC 


TEST MOV DM6 - SHOULD SPRING TRAP 


;SAVE BAD SP FOR PRINTING 
sRESET SP 
MOV DM6 FAILED TO CAUSE OVFLW TRAP 


sRESET 1.0. VECTOR 
3;G0 TO SCOPE EXIT 


GET RETURN PC 

;MOVE RETURN PC AROUND ERROR CALL 
sRESET SP 

PUSH NEW PSw 

;PUSH RETURN PC 

RETURN TO NEXT SUB-TEST 


ppeeereeeeeeverereeeeerrevererrereeererereenesenereneneneenaneeTs 


TEST THAT JSR CAN CAUSE OVERFLOW TRAP 


z*TEST 675 


pp eeeeerercereercererer ,eeeeeeeeererererereretaerererererererereeeres 


T$1675: 


#675,R0 
a#2$.R 


3460. SP 


R| 
7 goes 760 10 4 


ey THE SCOPE LOOP UTILITY 
LOAD RO WITH TEST NUMBER 
OAD R1 WITH TEST INSTRUCTION WORD 


it ON OVERFLOW ERROR 


;SAVE SP 
SET THE SP TO CAUSE TRAP 


SEQ 0248 
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TEST THAT JSR CAN CAUSE OVERFLOW TRAP SEQ 0249 
ccc ;SCOPE SYNC 
23: JSR PC,a#6$ ; TEST JSR - SHOULD SPRING TRAP 
MOV SP ,a#SREGS :SAVE BAD SP FOR ERROR PRINTOUT 
MOV R5,SP sRESET SP 
3$: ERROR 5 :JSR PUSH DID NOT SPRING OVFL TRAP 
BR 8$ 360 TO SCOPE EXIT 
MOV SP, a#SREGS 7SAVE BAD SP FOR ERROR PRINTOUT 
4$: MOV R5.,SP sRESET SP 
BR 8S 3G0 EXIT TEST - ALL OK 
6$: MOV SP ,a#SREGS ;SAVE BAD SP FOR ERROR PRINTOUT 
MOV R5,SP ;RESET SP 
5$: ERROR 5 7JSR PUSH FAILED TO SPRING OVFLW TRAP 
8$: MOV #BERR,aa4 ;RESET BUS T.0. VECTOR 
py eeereretererererererererrerereerererereReeAeKeneKeeKeReKeKeeeee 
s*TEST 676 TEST THAT 1ST PUSH IN TRAP MICROROUTINE CAUSES OVFLW TRAP 
sy eeeeereeerrererrerererererereeererereeRerereReNeeRReeeeeeTenee 
TST676: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #676,R0 7;LOAD RO WITH TEST NUMBER 
MOV a#v2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV aF14,R4 ;SAVE BREAK POINT TRAP VECTOR 
MOV SP,RS sSAVE SP 
MOV #4%$,a#4 ;GO TO 4$ ON OVFLW TRAP 
MOV #o$,am14 :G0 TO 6$ IF BPT SERVICED 
MOV #400,SP 7SET UP SP TO CAUSE OVFLW ON 1ST PUSH 
ccc ;SCOPE SYNC 
23: BPT ;TEST THE BPT - SHOULD CAUSE OVERFLOW TRAP 
MOV SP ,a#SREGS ;SAVE BAD SP FOR ERROR PRINTOUT 
MOV R5S,SP sRESET SP 
3$: ERROR 5 ;BPT FAILED TO TRAP 
BR 8$ 360 TO SCOPE EXIT 
4$: MOV R5S,SP sRESET SP 
BR 8$ :G0 EXIT = ALL OK 
6$: MOV SP ,a#SREGS ;SAVE BAD SP FOR ERROR PRINTOUT 
MOV R5,SP ;RESET SP 
5$: ERROR 5 sOVFLW TRAP FAILED TO BUMP BPT SERVICE 
8$: MOV #BERR, 84 sRESET VECTORS 
MOV R4,a814 
sleeeeeevecercerereerecececererererererrerrereresereererenereseens 
:eTEST 677 TEST THAT 2ND PUSH IN TRAP MICROUTINE CAUSES OVFiwW TRAP 
ss eeceveceeveeserececececevesesesesesesesaaeseeereneeseseserecese 
1S1677: 
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TEST THAT 2ND PUSH IN TRAP MICROUTINE CAUSES OVFLW TRAP SEQ 0250 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #677,R0 ::;LOAD RO WITH TEST NUMBER 
MOV a#2$.R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV ani RG : SAVE BPT VECTOR 
MOV SP AVE SP 
MOV ot te a#4 :GO0 10 my ON STACK OVFLOW 
MOV #6$.an14. :60 TO 6$ IF BPT SERVICED 
MOV #402,SP :SET SP TO CAUSE TRAP ON 2ND PUSH 
ccc :SCOPE SYNC 
2s: BPT : TEST THE BPT = SHOULD CAUSE OVERFLOW TRAP 
MOV SP, awSREGS :SAVE BAD SP FOR PRINTING 
MOV RS,SP SRESET SP 
38: ERROR 5 :BPT FAILED TO TRAP 
BR 8$ :G0 TO SCOPE EXIT 
4$: MOV RS.SP :RESET SP 
BR as :GO EXIT = ALL OK 
63: MOV SP, aeSREGS :SAVE BAD SP FOR PRINTING 
MOV R5,SP :RESET SP 
5$: ERROR 5 [OVFLW TRAP FAILED TO BUMP BPT SERVICE 
8S: MOV WBERR, aes :RESET VECTORS 
MOV RG, anid 
sr eeteererereerrerrererrrererreerenererereneereReAeeereReeeeerenes 
:*TEST 700 ILLEGAL INSTRUCTION TEST = JSR RN,2R 
sy eeeeeeerereererereerererererererererenereneeeReeeeeeeeereereeee 
1$1700: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
MOV #700,R0 ::LOAD RO WITH TEST NUMBER 
MOV av2$.R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,RS >SAVE SP 
MOV PC .a#SLPERR >SET ERROR LOOP ADDRESS 
1$: MOV aes ,R4 :SAVE 1.0. VECTOR 
MOV #4$.a#4 : ILLEGAL INSTR. TRAP GOES TO 4$ 
MOV RS, SP :RESET SP FOR ERROR LOOP 
MOV #3$,R2 :IN CASE JSR JUMPS TO [R2] 
‘aaa =SCOPE SYNC 
2$: JSR R3,R2 : JSR MODE 0 FORCES TRAP - GO TO 4$ 
MOV R4 ans :RESTORE 1.0. VECTOR 
38: ERROR 5 [JSR FAILED TO SPRING TRAP 
4$: MOV RG, ans SRESTORE VECTOR 
MOV RS,SP “RESET SP 
speeererereceseeeeterrrereereeerrererererenenererenereaneneereTesT 
>eTEST 701 ILLEGAL INSTRUCTION TEST - JMP &R 
sl eteereececeececeeesereesenvererertesseserenseaneceeseneenerecne 
TS1701: 
SCOPE :CALL THE SCOPE LOOP UTILITY 
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ILLEGAL INSTRUCTION TEST - JMP SEQ 0251 
MOV #701,R0 :;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV SPR sSAVE SP 
MOV PC ,a#SLPERR 3 SET ERROR LOOP ADDRESS 
1$: MOV aad ,R4 ;SAVE VECTOR POINTER AT LOC. 4 
MOV #4%,a84 ;0N TRAP. - GO T0 4$ 
MOV R5, §P sRESET SP FOR ERROR LOOP 
MOV #38, R2 :IN CASE IT JUMPS TO ADDR IN RN 
ccc : SCOPE SYNC 
2$: JMP RO :JMP MODE 0 FORCES TRAP =- GO TO 4$ 
MOV R4,aa4 sRESTORE VECTOR POINTER AT LOC. 4 
3$: ERROR 5 s ILLEGAL INSTR TRAP FAILED 
4$: MOV RG 084 sRESTORE VECTOR POINTER AT LOC. 4 
MOV —s RS, SP TRESET SP 
sy etreeererereeerrerererererereererereerreNeeeKeKeKeeeRKeKeKeeeeeee 
s*TEST 702 BUS TIMEOUT TRAP TEST = TST (R) 
sy eerererererererererererrererereerenereeereeeAAeReReKeReereeeees 
TS1702: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #702,R0 > LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 s;LOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP,R5 > SAVE SP 
MOV PC, ,a#SLPERR 3;SET ERROR LOOP ADDRESS 
1$: MOV aad ,R4 sSAVE ORIGINAL 1.0. VECTOR POINTER 
MOV #4$,a84 ;0N 7.0. TRAP = GO TO 4$ 
MOV #160000 ,R2 ;ADDRESS CAUSES 1.0. 
MOV R5S,SP ;RESET SP FOR ERROR LOOP 
ccc ;SCOPE SYNC 
2$: TST (R2) sFORCE 1.0. TRAP - GO TO 4$ 
MOV R4,aa4 sRESTORE 17.0. VECTOR 
3$: ERROR 5 ; TIMEOUT TRAP FAILED 
43%: MOV RG ,aa4 sRESTORE 1.0. VECTOR 
MOV R5,SP ;RESET SP 
sp eeeererrrerererererererrererereererereeeneneReNeeereeeeeeerenes 
s*TEST 703 “T'' BIT TRAP TEST 
“Eee eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeekeReeetektewkekeetereketeeeee 
11703: 
SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #703,R0 LOAD RO WITH TEST NUMBER 
MOV av2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
MOV SP.R5 SAVE SP 
MOV PC ,a#$SLPERR 3SET ERROR LOOP ADDRESS 
MOV R5,SP ;RESET SP FOR ERROR LOOP 
MOV #4$,a814 :60 TO 4$ WHEN ‘T'' TRAP SPRUNG 
MOV #20,-(SP) 7SET “'T’’ BIT ON a 
MOV #2$,-(SP) :SET UP NEW PC ON STACK 
CCt ;SCOPE SYNC 
RTT > TURN ON “'T'’ BIT = GO TO 28% 


aoe ik | 
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CQKDA=D KD11-K BASIC LOG! 1¢ TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 253 
CQKDAD.P11 11-SEP-79 13:31 1703 “T'’ BIT TRAP TEST SEQ 0252 

13278 051370 005700 2$: TST RO SPRING ‘'T'’ BIT TRAP = GO TO 4$ 

1eere 051372 104005 3$: ERROR 5 3NO ‘'T’' BIT TRAP OCCURRED 

leans 051374 000405 BR 6$ :GO EXIT 

13580 051376 032766 000020 000002 4%: BIT #20,2(SP) :‘‘T’ BIT SET IN OLD PSw? 

eens 051404 001001 BNE 6% ;BR IF YES 

\eeee 051406 104001 5$: ERROR 1 ;#1# BIT NOT SAVED ON STACK 

13585 051410 012737 000016 000014 6$: MOV #16,a814 RESTORE ‘‘l"' BIT TRAP CATCHER 

13586 051416 005037 000016 CLR avi6 

fy 051422 010506 MOV R5,SP RESET SP 

13589 ppeteeerereererrereerereereeeertererererererereeKeeeeeTereerereee 

13590 TEST 704 TEST PUSH INTO PSW WITH CSP) = 000000 

13591 ; THESE NEXT TWO TESTS VERIFY THAT A “RED ZONE’ TRAP OCCURS IF A 

13592 + PUSH 1S ATTEMPTED WITH THE CSP) INITIALLY EQUAL TO 000000,177572, 

13593 ROHR RERH KHER REKH KKK Hee KK KEK KKK KAKeKeReAeKAReeeeeKeteReteee 

13594 051424 181704: 

13595 051424 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

13596 051426 012700 000704 MOV #704,R0 >;LOAD RO WITH TEST NUMBER 

13597 051432 013701 051456 MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

13598 051436 010605 MOV ag 5 ;SAVE THE SP 

13599 051440 013704 000004 MOV av4,R > SAVE THE BUS an VECTOR 

13600 051444 012737 051500 000004 MOV #4$, 386 7""RED JONE'’ TRAP GOES TO 4$ 

13601 051452 005006 CLR SP MAKE SP = 000000 

Yo 051454 000257 ccc :SCOPE SYNC 

13604 051456 012746 007777 2$: MOV #7777,-(SP) ;ATTEMPT PUSH INTO PSW = SHOULD CAUSE 

fore 7""RED ZONE'’ TRAP TO BE SPRUNG 

13607 051462 010437 000004 MOV R4 084 47 hey wx ERROR VECTOR 

13608 051466 005004 CLR RG :(R4] = $ / B SP 

13609 051470 010603 MOV SP,R3 ;CR3] = WAS SP 

13610 051472 010506 MOV R5,SP ;RESET THE SP 

13611 051474 104003 3$: ERROR 3 ; TRAP NOT SPRUNG 

toets 051476 000414 BR T$1705 3:G0 TO SCOPE EXIT = SCHOOL'S OUI 

13614 051500 022706 000000 4$: CMP #0,SP ;WAS 11 A RED ZONE TRAP ? 

foth 051504 001406 BEQ ot 3;BR IF YES 

13617 051506 010437 000004 MOV R4,am4 RESTORE BUS me VECTOR 

13618 051512 005004 CLR RG :CR4]= $/ BS 

13619 051514 010603 MOV SP,R3 ;CR3) = WAS ry 

13620 051516 010506 MOV R5,SP RESET THE SP 

frat! 051520 104003 5$: ERROR 3 ; TRAP SPRUNG BUT NOT RED ZONE 

13623 051522 010506 6$: MOV R5,SP sFIX UP THE SP 

13624 051524 010437 000004 MOV R4,aa4 RESTORE BERR VECTOR 

feats ppeeeeeeereereerereerereeeereerererrerereneereererrerereeee Tee eTe 

13627 ;*TEST 705 TEST PuSH INTO SR WITH CSP) = 177572 

13628 ppeeweeeeeeeeeerererereeereerereerereeeerereeeeeeerereeeeeeeeTeTS 

13629 051530 1§1705: | 
| 
| 
j 
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COKDA=D KD11-K BASIC LOGIC TESTS MACY 
CQKDAD.P11 =: 11-SEP-79 13:31 1705 TEST PUSH INTO SR WITH (SP) = 177 

13630 051530 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 
13631 051532 012700 000705 MOV #705,R0 :sLOAD RO WITH TEST NUMBER 

13632 051536 013701 051564 MOV av2$._R1 :LOAD R1 WITH TEST INSTRUCTION WORD 
13633 051542 010605 MOV SP,R5 ‘SAVE THE SP 

13634 051544 013704 000004 MOV aes RG [SAVE THE BUS ERROR VECTOR 

13635 051550 012737 051606 000004 MOV #4%.a84 ;"RED ZONE’ TRAP GOES TO 4$ 

13636 051556 012706 177572 MOV #177572,5P :MAKE SP=177572 

13637 051562 000257 aaa :SCOPE SYNC 

13639 051564 012746 177777 2$: MOV #-1,-(SP) sATTEMPT PUSH INTO SR = SHOULD CAUSE 
ory :""RED ZONE'' TRAP TO BE SPRUNG 
13642 051570 010437 000004 MOV R4,aaG :RESTORE BUS ERROR VECTOR 

13643 051574 005004 CLR RG :(R4] = S / B SP 

13644 051576 010603 MOV SP,R3 :(R3] = WAS SP 

13645 051600 010506 MOV R5,SP sRESET THE SP 

13646 051602 104003 3$: ERROR 3 ; TRAP NOT SPRUNG 

+ seed 051604 000414 BR TS1706 3:60 TO SCOPE EXIT = SCHOOL'S OUT 
13649 051606 022706 900000 4$: CMP #0,SP :WAS IT A RED ZONE TRAP ? 

13650 051612 001406 BEQ 6$ <BR IF YES 

13652 051614 010437 000004 MOV R4,a84 sRESTORE BUS ERROR VECTOR 

13653 051620 005004 CLR RG :(R4J= S$ / B SP 

13654 051622 010603 MOV SP,R3 :(R3] = WAS SP 

13655 051624 010506 MOV R5,SP “RESET THE SP 

eset 051626 104003 58: ERROR 3 ; TRAP SPRUNG BUT NOT RED ZONE 
13658 051630 010506 6$: MOV R5,SP sF1IX UP THE SP 

tires 051632 010437 000004 MOV R4,aa4 sRESTORE BUS ERROR VECTOR 

13661 pp eeeeeeererererererrereenertrereeerererereeeKeeetererererererere 
13662 s*TEST 706 TEST PUSH INTO SLR WITH CSP] = 177776 

13663 sp eeeeererererererereerererererereererenenAeeeeeeeReerereRAeReeee 
13664 051636 181706: 

13665 051636 000004 SCOPE sCALL THE SCOPE LOOP UTILITY 
13666 051640 012700 000706 MOV #706,R0 3;LOAD RO WITH TEST NUMBER 

13667 051644 013701 051672 MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
13668 051650 010605 MOV SP.RS5 ;SAVE THE SP 

13669 051652 013704 000004 MOV aaa ,R4 [SAVE THE BUS ERROR VECTOR 

13670 051656 012737 051714 000004 MOV #4$,a84 ;""RED ZONE'’ TRAP GOES TO 4$ 

13671 051664 012706 177776 MOV #177776,SP :MAKE SP=177776 

13672 051670 000257 CCC >SCOPE SYNC 

13674 051672 012746 000200 2s: MOV #200,-(SP) sATTEMPT PUSH INTO SLR = SHOULD CAUSE 
teks :""RED ZONE'' TRAP TO BE SPRUNG 

6 

13677 051676 010437 000004 MOV R4,an4 sRESTORE BUS ERROR VECTOR 

13678 051702 005004 CLR RG :(R4]) = $ / B SP 

13679 051704 010603 MOV SP,R3 *(R3] = WAS SP 

13680 051706 010506 MOV R5,SP “RESET THE SP 

13681 051710 104003 3$: ERROR 3 ; TRAP NOT SPRUNG 

for 051712 000414 BR 181707 ::G0 TO SCOPE EXIT = SCHOOL'S OUT 
1 

13684 0517146 022706 000000 4$: CMP #0,SP :WAS 11 A RED ZONE TRAP ? 

13685 051720 001406 . BEO 6$ “BR IF YES 
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1706 TEST PUSH INTO SLR WITH CSP) = 177776 SEQ 0254 
MOV R4,a84 sRESTORE BUS ERROR VECTOR 
CLR RG sCR4J)= S / B SP 
MOV SP,R3 3CR3) = A ay - 
MOV R5,SP sRESET THE S 
5$: ERROR 3 ; TRAP SPRUNG euT NOT RED ZONE 
6$: MOV R5,SP sF1IX UP THE SP 
MOV R4,a84 RESTORE BUS ERROR VECTOR 
py eteeerererrererererereeeererereeeeeeeKekeeKeKerereeRereeeeeeree 
:*TEST 707 RSVD INSTRUCTION TEST = 000007 THRU 000077 
SP RRRER ARETE REE R ERATE EATER ETRE R ARATE AREER AK KARA eRe EE 
TS1707: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #707,R0 >: LOAD RO WITH TEST NUMBER 
5$: MOV SP,R5 ;SAVE THE SP 
MOV #4$,a#10 :SET UP RSVD INSTR. TRAP VECTOR 
CLR avi2 
MOV #7,R) sSET UP FIRST ONE IN GROUP 
MOV. PC ,a#SLPERR sONLY LOOP ON BAD OP CODE 
1$: MOV R5,SP RESET SP FOR ERROR LOOP AND NEW INSTR 
MOV R1,a#2$ ;LOAD New INSTR 
ccc ;SCOPE SYNC 
2$: 000007 sTEST THE RSVD INSTR - THIS LOCATION 


:;GETS CHANGED EACH PASS THROUGH 


3$: ERROR 5 ;RSVD INSTR. IN R1 FAILED TO TRAP 
4$: INC R1 ;GENERATE NEW RSVD INSTR 

CMP #100,R1 ;AT END OF THIS GROUP ?? 

BNE 1$ 7BR IF NOT 

MOV RS,SP MAKE SURE TO RESET THE SP 


MOV #S$,A#SLPERR ;LOOP FROM BEGINNING ON ERROR 


s_eeeerrerererererereererererererererereneneeeeearaeeeneseneeenes 


s*TEST 710 RSVD INSTRUCTION TEST = 000210 THRU 000237 


sp eeeeererreerererrererererererereeererereeAAeAeeeeReeeeRerenenees 


TS1710: 


SCOPE sCALL THE SCOPE LOOP UTILITY 
MOV #710,R0 :;LOAD RO a TEST NUMBER 
5$: MOV SP,R5 SAVE THE S 
MOV #4$,a#10 SET UP RSWD INSTR, TRAP VECTOR 
CLR avie2 
MOV #210,R1 ;SET UP FIRST ONE IN GROUP 
MOV PC, eos rene 7SET ERROR LOOP ADDRESS 
1$: MOV R5,S RESET SP FOR ERROR LOOP AND NEW INSTR 
MOV R1 “ees ;LOAD NEW INSTR 
ccc ;SCOPE SYNC 
23: 000210 sTEST THE RSVD INSTR = THIS LOCATION 
:GETS CHANGED EACH PASS THROUGH 
3$: ERROR 5 sRSVD INSTR. IN R1 FAILED TO TRAP 
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CQKDAD.P11 11-SEP-79 13:31 1710 RSVD INSTRUCTION TEST = 000210 inka 000237 SEQ 0255 
13742 052100 005201 4$: INC R1 +5 ee NEW RSVD INSTR 

13743 052102 022701 000240 CMP #240,R1 Dy OF THIS GROUP ?? 

I ioe 052106 001366 BNE 1$ BR IF NOT 

13746 052110 010506 MOV R5,SP sMAKE SURE TO RESET THE SP 

ete 052112 012737 052040 001010 MOV #5$ ,Aa#SLPERR LOOP FROM BEGINNING ON ERROR 

13749 ppeeeeeeeereererereererereeererereteeereeteretereeeeeeneeeeeTEe 
13750 :*TEST 711 RSVD INSTRUCTION TEST = 007000 THRU 007777 

13751 ppeteeecererrererererrerrererereeerererereneeeereeereeeKeReeTe TTS 
13752 052120 TST711: 

13753 052120 000004 SCOPE ¢CALL THE SCOPE LOOP UTILITY 

13754 052122 012700 000711 MOV #711,R0 ;LOAD RO Sy TEST NUMBER 

13755 052126 010605 5$: MOV SP,R5 [SAVE THE S$ 

13756 052130 012737 052166 000010 MOV #4$,a#10 ;SET UP ASD INSTR. TRAP VECTOR 

13757 052136 005037 000012 CLR avie 

13758 052142 012701 007000 MOV #7000,R1 7SET UP FIRST ONE IN GROUP 

13759 052146 010737 001010 MOV PC ,@#SLPERR 3 SET EF.ROR LOOP ADDRESS 

13760 052152 010506 1$: MOV R5,SP RESET SP FOR ERROR LOOP AND NEW INSTR 
13761 052154 010137 052162 MOV R1,a#2$ ;LOAD New INSTR 

saree 052160 000257 ccc ;SCOPE SYNC 

13764 052162 007000 2$: 007000 sTEST THE RSVD INSTR = THIS LOCATION 
saree 3GETS CHANGED EACH PASS THROUGH 

+ shed 052164 104005 3$: ERROR 5 sRSVD INSTR. IN R1 FAILED TO TRAP 
13769 052106 005201 4$: INC R1 ;GENERATE NEW RSVD INSTR 

13770 052170 022701 010000 CMP #10000,R1 :AT END OF THIS GROUP ?? 

yf 4a 052174 001366 BNE 1$ ;BR IF NOT 

13773 052176 010506 MOV R5,SP ;MAKE SURE TO RESET THE SP 

eere 052200 012737 052126 001010 MOV #5$,a#SLPERR ;LOOP FROM BEGINNING ON ERROR 

13776 ppeeweeererreerreerrereererrerirenetereereteneeeAeeeeeeeTe ETAT E eS 
13777 s*TEST 712 RSVD INSTRUCTION TEST = 075000 THRU 076777 

13778 ppeeeeeeceereerrereeererrererererererereneterereneeeenereeeeee eS 
13779 052206 TST712: 

13780 052206 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

13781 052210 012700 000712 MOV #712,R0 7;LOAD RO WITH TEST NUMBER 

13782 052214 010605 5$: MOV SP,R5 ;SAVE THE SP 

13783 052216 012737 052256 000010 MOV #4$,a#10 7SET UP RSVD INSTR. TRAP VECTOR 

3784 052224 005037 000012 CLR avi2 

13785 052230 012701 075000 MOV #75000,R1 ;SET UP FIRST ONE IN GROUP 

137 052234 010737 001010 MOV PC, paren ;SET ERROR LOOP ADDRESS 

13787 052240 010506 1$: MOV R5,5S sRESET SP FOR ERROR LOOP AND NEW INSTR 
13788 052242 010137 052250 MOV R1 “Saas ;LOAD NEW INSTR 

ere 052246 000257 ccc ;SCOPE SYNC 

13791 052250 075000 23: 75000 :TEST THE RSVD INSTR = THIS LOCATION 
fia :GETS CHANGED EACH PASS THROUGH 

13794 052252 000240 NOP : IN CASE NON TRAPPING INSTR IS TWO WORDS 
f t4-44 052254 104005 3$: ERROR 5 :RSVD INSTR. IN R1 FAILED TO TRAP 
13797 052256 005201 4%: INC R1 ;GENERATE NEW RSVD INSTR 
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13798 052260 022701 076600 CMP #MED,R1 3MED INSTRUCTION? 

13799 052264 001774 BEQ 4% sBR IF YES--SKIP IT 

13800 052266 022701 077000 CMP #077000,R1 AT END OF THIS GROUP ?? 
13801 052272 001362 BNE 1$ BR IF NOT 


13802 
13803 052274 010506 MOV R5,SP MAKE SURE TO RESET THE SP 
13804 052276 012737 052214 001010 MOV #5% ,a#SLPERR ;LOOP FROM BEGINNING ON ERROR 


13806 p_eeeeereerereerereererereereerererereereereeneeneeeeteeeeHeteres 
13807 seTEST 713 RSVD INSTRUCTION TEST = 106400 THRU 107777 

13808 ppeeeeeereerercerereerererrerererereerereneerereereneeetererereee 
13809 052304 TST713: 

13810 052304 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
13811 052306 012700 000713 MOV #713,R0 3;LOAD RO WITH TEST NUMBER 

13812 052312 010605 5$: MOV SP,R5 SAVE THE SP 

13813 052314 012737 052352 000010 MOV #4$,a#10 ;SET UP RSVD INSTR. TRAP VECTOR 
13814 052322 005037 000012 CLR avi2 

13815 052326 012701 106400 MOV #106400,R1 ;SET UP FIRST ONE IN GROUP 

13816 052332 010737 001010 MOV PC, — :SET ERROR LOOP ADDRESS 

13817 052336 010506 1$: MOV R5,S RESET SP FOR ERROR LOOP AND NEW INSTR 
13818 052340 010137 052346 MOV R1 “3028 ; LOAD New INSTR 

13819 052344 000257 ccc SCOPE SYNC 
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13820 

13821 052346 106400 28: 106400 sTEST THE RSVD INSTR - THIS LOCATION 

1 3a58 :GETS CHANGED EACH PASS THROUGH 

1338 052350 104005 3$: ERROR 5 sRSVD INSTR. IN R1 FAILED TO TRAP 
13826 052352 005201 4$: INC R1 :GENERATE NEW RSVD INSTR 

13827 052354 022701 106500 CMP #106500,R1 :MFPD INSTRUCTION ?? 

13828 052360 001002 BNE 108 :BR IF NOT 

13829 052362 012701 106700 MOV #106700,R1 sSKIP MFPD AND MTPD INSTRUCTIONS 

13830 052366 022701 110000 108: CMP #110000,R1 sAT END OF THIS GROUP ?? 

13831 052372 001361 BNE 1$ :BR IF NOT 

13833 052374 010506 MOV R5,SP :MAKE SURE TO RESET THE SP 

13834 052376 012737 052312 001010 MOV #5$,a#SLPERR sLOOP FROM BEGINNING ON ERROR 

13835 052404 012737 061122 000010 MOV #WRSERR,a# 10 sRESTORE RSVD INSTR VECTOR 

13836 052412 012737 000340 000012 MOV #340,a#12 

Ftd 052420 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

13839 THIS NEXT GROUP OF SEQUENTIAL TESTS VERIFIES THAT A ‘'T'' BIT 

13840 TRAP CAN BE SERVICED IN EACH MICROWORD THAT DOES A ‘BUT SERVICE" 
saat) SEACH ROUTINE ENTERS THE TRAP MICROUTINE WHEN THE TRAP 1S SPRUNG 

13843 052422 012737 061070 000014 TSET: MOV #TBSER,ae14 :SET UP THE “'T'’ BIT TRAP VECTOR 

ty 052430 012737 000340 000016 MOV #340,a016 sPRIORITY 7 

13846 pp eeeeerereeereererreerretereerereererretereeerereeKeerereKteeeeee 
13847 r*TEST 714 BUT SERVICE -- ONE WORD INSTRUCTIONS-ALL MODES -- FROM TABLE 
13848 s"INSTAB' (INSTRUCTION TABLE) CONTAINS ALL ONE WORD INSTRUCTIONS 

13849 sTHAT TEST A "BUT SERVICE’ IN A UNIQUE ROM LOCATION. THE TABLE MUST 
13850 sBE TERMINATED WITH A O ENTRY. 

13851 pp eteeeerrerrerererreerererereereetetererreeereeeterereeeeeee eee 
13852 052436 TST714: 

13853 052436 012700 000714 MOV #714,R0 ::LOAD RO WITH TEST NUMBER 

13854 052442 010605 6$: MOV SP.R5 :SAVE THE SP 

13855 052444 012704 063636 MOV #INSTAB,RG sPUT POINTER TO TABLE IN R4& 

13856 052450 012401 4$: MOV (R4)+,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 
13857 052452 001422 BEQ 5$ sEXIT TEST IF END OF TABLE 

13858 052454 010737 001010 MOV PC, a#SLPERR :LOOP ON FAILING INSTRUCTION ONLY 
13859 052460 010137 052512 1$: MOV R1,a#2$ sSTORE TEST INSTRUCTION TO BE EXECUTED 
13860 052464 012702 063312 MOV #MBUFO,R2 :IN CASE DM1 DEST--(R2) 

13861 052470 012703 063316 MOV #MBUF1,R3 :IN CASE SM1--(R3) 

13862 052474 010506 MOV R5,SP sRESTORE SP FOR ERROR LOOPING 

13863 052476 012746 000020 MOV #20,-(SP) :SET ‘'T’’ BIT IN THE NEW PSW 

13864 052502 012746 052512 MOV #2$,-(SP) :MAKE NEW PC = 2% 

13865 052506 000257 ccc :SCOPE SYNC 

13866 052510 000006 RTT :SET "'T'' BIT = GO TO 2% 

13868 052512 000240 2$: NOP INSTRUCTION FROM TABLE IS STORED HERE AND 
ts 4 :SHOULD SPRING TRAP 

44) 052514 104005 3$: ERROR 5 :BUT SERVICE FAILED 

13873 052516 000754 BR 4$ :GET NEXT INSTRUCTION FOR BUT SERVICE TEST 
1387 052520 012737 0£2442 001010 5$: MOV #6$, aaSLPERR :LOOP FROM BEGINNING ON ERROR 
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3923 


052554 


052556 
052556 
052560 
052564 


052570 


052632 
052634 
052640 
052642 


05 

052670 
052672 
052676 
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000257 
000002 
104005 


000004 
012700 
013701 


032737 


004777 
104005 
010506 


000006 
000167 
104005 


000716 
052634 


040000 


001010 


052640 
000020 
052634 


010456 


000717 


052672 


000u00 


063234 


063316 
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715 BUT SERVICE TEST - (RTI 


sp eeereeeererererereererererereereererreneetreKereneeeeeTeReeeRes 


s*TEST 715 BUT SERVICE TEST = (RTI) 


SERRA RAK e eee eee Ke K Ke K HHA H KRHA HATHA KTH AKAAKAHK KAA K RAAT HK KAKA HAA 


TST718: 


SCOPE ey THE SCOPE LOOP UTILITY 
MOV #715,R0 OAD RO WITH TEST NUMBER 
MOV a#2$,R1 ‘LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #20,-(SP) ;SET “'T’’ BIT IN_THE NEW PSW 
MOV #3$,-(SP) :MAKE NEW PC = 3$ 
ccc :SCOPE SYNC 
28: RT] INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 BUT SERVICE IN XXX FAILED 


SERRA AAA E HEAR AAKEAEEE TET ATTA TERETE EEA AAATAAAARER AAA R ERRATA 


s*TEST 716 BUT SERVICE TEST = (JSR %&R,@A) 


SERRA A REAR RA KEKE RATATAT EEE TATE T AAA AAA AAA AAER ARERR EER A EEA 


TST716: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
a #716,R0 + LOAD RO WITH TEST NUMBER 
a#2$ Rl LOAD R1 WITH TEST INSTRUCTION WORD 


~SBTTL USER CONTROLLED BREAKPOINT -- BIT14 
BIT #B1T14,a#BPTLOC ;BR a HALT SET ?? 


BEQ 44 :BR IF N 

HALT ;BREAK=DEPRESS CONTINUE TO CONTINUE 

MOV SP,R5 SAVE THE SP 

MOV PC ,a#SLPERR ;FOR PROPER SP RESETTING ON ERROR LOOP 
1$: MOV R5,SP :RESTORE SP FOR ERROR LOOPING 

MOV #3$,a¢MBUF | 7SET UP POINTER=-DEST ADDR = 3$ FOR JSR 

MOV #20,-(SP) ;SET ‘'T’’ BIT IN_THE NEW PSW 

MOV #2$,-(SP) ;MAKE NEW PC = 2% 

ccc SCOPE SYNC 

aTT :SET “'T’' BIT = GO TO 2% 
2$: JSR PC ,@MBUF 1 ; INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 

MOV R5,SP ;RESTORE SP IF ALL OK OR NOT LOOPING 
pp eeeeerererererererererrerererererererereeeeeeeeneeeeeeeee eee ee 
peTEST 717 BUT SERVICE TEST - (JMP A) 


ppereeeeereerrererrertererereereereeretteneeeteeeeeKeeeeeee EET eS 


TST717: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #7i7,R0 >;LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 LOAD R1 WITH TEST INSTRUCTION WORD 
MOV #20,-(SP) :SET “'T’' BIT IN THE NEW PSW 
MOV #2%,-(SP) : MAKE =, oe 
ccc SCOPE SYN 
RTT $63 “T" Bit - GO 10 2% 
2$: JMP 3$ ;JMP INSTRUCTION SHOULD SPRING TRAP 


3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 


SEQ 0258 
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1720 BUT SERVICE TEST - (JMP @A) 


seeeeerererererrererrererereererereeeeereteKeneKeeeeeneereeeeense 


eTEST 720 BUT SERVICE TEST - (JMP @A) 


seerererrerererererrereseerererereereReaeereRentarenerereeeeeeee 


181720: 


SCOPE eCALL THE SCOPE LOOP UTILITY 
MOV #720,R0 LOAD RO WITH TEST NUMBER 
MOV a#2$,R1 (OAD R1 WITH TEST INSTRUCTION WORD 
MOV #3$ ,a#mBUFO ;SET UP POINTER=-DEST ADDR = 3$ FOR JMP 
MOV #20,-(SP) :SET “'T"’ BIT IN THE NEW PSW 
MOV #2$,-(SP) ;MAKE NEW PC = 2% 
ccc SCOPE SYNC 
RTT ;SET "'T’’ BIT = GO TO 2% 
28: JMP aMBuF 0 ;JMP INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 


py eeeereerererrrerereeerererereeeeereerereeeeeeeeereReeeeereeeeee 


s*TEST 721 BUT SERVICE TEST - (RTS PC) 


pp eteerererrerrrerereereerenereereeeeeeeeeekeKeReeKeeeeeeeReneeee 


TST721: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #721,R0 :;LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 ;LOAD R1 WITH TEST INSTRUCTION WORD 

MOV SP,R5 SAVE THE SP 

MOV PC ,@#SLPERR ;FOR PROPER SP RESETTING ON ERROR LOOP 
1$: MOV R5,SP RESTORE SP FOR ERROR LOOPING 

MOV #3$,-(SP) gRTS WILL LOAD PC WITH 5% 

MOV #20,-(SP) ;SET “‘T’’ BIT IN THE NEW PSW 

MOV #2%,-(SP) sMAKE NEW PC = 2% 

ccc SCOPE SYNC 

RTT ;SET “'T’' BIT = GO TO 2$ 
2$: RTS PC :RTS INSTRUCTION SHOULD SPRING TRAP 
3$: ERROR 5 ;BUT SERVICE IN XXX FAILED 


ppeeeeeerrereererrerreererereteerentereeeteeeeeenteeeeeeeeeeeeees 
*TEST 722 ALU ADD FUNCTION TEST 

sTHIS TEST VERIFIES THAT THE ALU ADD FUNCTION CAN RESPOND CORRECTLY 
:T0 THE 8 POSSIBLE COMBINATIONS THAT COULD OCCUR AT THE INPUTS OF 
EACH OF THE 16 BIT POSITIONS AS DESCRIBED BELOW: 


AIN BIN CIN 


— ss -OOCO 
-—— OO0 - | OO 
-OoO-oOo-oO-"O 


Be Se Be Se Be Be Se Se 


;THE TEST NO.S ALONG WITH THE CORRECT ANSWERS ARE STORED IN A TABLE 
; TAGGED “ALUADD' AS SHOWN BELOW: 


ae 


SEQ 0259 
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053050 
053052 


053054 
053056 
053060 


053062 
053004 


053066 
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012700 000722 
012705 063340 
010737 001010 


022705 063416 


000257 
060103 


021503 
001766 


017504 
014502 
104010 


005725 
000761 


012737 053016 0601010 
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1722 ALU ADD FUNCTION TEST SEQ 0260 


;ALUADD: NULL 
SRC OP! 
a 


SUP 
SRC OP2 
DST OP2 
SUM2 
ETC. 


;AFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING PAIR 
+ OF NO.S IF SWO9=1 OR GO ON TO THE NEXT PAIR IF SwO9=0. 


-#eeererererrerrerererererrererteererereenererereerereeereeeeeee 


11722: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #722,R0 [;LOAD RO WITH TEST NUMBER 
1$: MOV MALUADD +4 ,R5 2R5 POINTS TO TABLE OF NO.S 
MOV PC ,a#SLPERR ;LOOP ONLY ON FAILING PAIR OF #°S 
CMP ~(R5) ,=(R5) [RESET R5 TO POINT TO BAD GUYS 
(OR NULL ENTRY FIRST TIME THROUGH) 
4$: TST (R5)¢ :POINT TO A SRC OP 
CMP WALUADD*+62,R5 ;DONE ALL NO. IN TABLE ? 
BEQ 5$ ;BR IF YES 
MOV (R5)4*,R1 [LOAD SRC OP 
MOV (R5)4,R3 ;LOAD DEST OP 
ccc SCOPE SYNC 
23: ADD R1,R3 TEST THE ADD FUNCTION 
CMP (R5) R53 CORRECT SUM ? 
BEQ 4$ :GO ADD NEXT PAIR IF YES 
MOV (R5) ,R4 ;GET S / B SUM 
MOV ~(R5) ,R2 GET DEST OP 
3$: ERROR 10 ;ALU ADD OPERATION FAILED 
TST (R5)¢ ;CORRECT RS POINTER 
BR 4$ ;G0 DO NEXT PAIR 
5$: MOV #1, Q#SLPERR ;LOOP FROM BEGINNING ON ERROR 


peeeeeeeereeerrereeereerererererrerreeererereeetererereeeeeeTeee 
STES ST 723 ALU SUB FUNCTION TEST 

THIS TEST VERIFIES THAT THE ALU ADD FUNCTION CAN RESPOND CORRECTLY 
:T0 THE 8 POSSIBLE COMBINATIONS THAT COULD OCCUR AT THE INPUTS OF 
TEACH OF THE 16 BIT POSITIONS AS DESCRIBED BELOW: 


AIN BIN CIN 


—-— - OO0° 
ch Oh ie 
o-o-o-o 
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053150 
053132 


053134 
053136 


053140 
053142 
053144 


053146 
053150 


053152 
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000257 
160103 


021503 
001766 


011504 
014502 
104010 


005725 
000761 


012737 053102 001010 


900723 
063560 
001010 


063636 


. 
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1723 ALU SUB FUNCTION TEST 


; 1 1 1 


THE TEST NO.S ALONG WITH THE CORRECT ANSWERS ARE STORED IN A TABLE 
; TAGGED “"ALUADD"’ AS SHOWN BELOW: 


; ALUSUB: NULL 


Oe Oe Oe Oe Oe eee 
“” 
Zz 
oO 
oO 
ov 
~m 


sAFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING PAIR 
: OF NO.S IF SWO9=1 OR GO ON TO THE NEXT PAIR IF SwO9=0. 


*@eeeeeeereerereerrererererereererererekeekereeerereneeeeereeere 


181723: 


SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #723,R0 ;;LOAD RO WITH TEST NUMBER 
1$: MOV #ALUSUB+4 ,R5 7R5S POINTS TO TABLE OF NO.S 
MOV PC ,a#SLPERR ;LOOP ONLY ON FAILING PAIR OF #°S 
CMP ~(R5),-CR5) sRESET RS TO POINT TO BAD GUYS 
(OR NULL ENTRY FIRST TIME THROUGH) 
4%: TST (R5)¢ [POINT TO A SRC OP 
cmp MALUSUB+62,R5 ;DONE ALL NO.S IN TABLE ? 
BEQ 5$ :BR IF YES 
MOV (R5)4*,R1 ;LOAD SRC OP 
MOV (R5)4*,R3 :LOAD DEST OP 
ccc SCOPE SYNC 
2s: SUB R1,R3 TEST THE SUB FUNCTION 
CMP (R5),R3 ;CORRECT DIFF. ? 
BEQ 4% :GO SUB NEXT PAIR IF YES 
MOV (R5) RS ;GET S / B DIFF 
MOV ~(R5) ,R2 GET DEST OP 
3$: ERROR 10 ;ALU SUB OPERATION FAILED 
TST (R5)+ CORRECT RS POINTER 
BR 4% 3GO DO NEXT PAIR 
5$: MOV #1S AMSLPERR ;LOOP FROM BEGINNING ON ERROR 
seereerrerereerrererrerenererererereereeenerererennereeeeeeeenes 
SeTEST 724 ALU ‘AND’ FUNCTION TEST USING BIC INSTRUCTION 


[THIS TEST VERIFIES THAT THE ALU ‘AND’ FUNCTION RESPONDS CORRECTLY 
7TO ALL POSSIBLE COMBINATIONS FOR EACH OF THE 16 BIT POSITIONS 

;1T EXECUTES THE BIC INSTRUCTION FOR THE FOLLOWING PAIRS OF 
[OPERANDS AND TESTS FOR THE INDICATED RESULT: 


;SOURCE OP DEST. OP RESULT 
;000000 000000 000000 
3177777 177777 000000 


SEQ 0261 
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053160 


053214 
053216 


053220 
053222 


053224 
053226 
055230 


053232 
053254 


053236 
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012700 000724 
012705 063420 
010737 001010 
024545 


005725 
022705 063476 


000257 
040103 


020315 
001766 


011504 
014502 
104010 


005725 
000761 


012737 053166 001010 
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1724 ALU "‘AND’' FUNCTION TEST USING BIC INSTRUCTION 


; 000000 177777 177777 
177777 000000 000000 
3125252 125252 000000 
3052525 052525 000000 

3125252 052525 052525 

052525 125252 125252 


;THE 8 PAIRS OF NO.S AND THE ANSWERS ARE STORED IN A TEBLE TAGGED 
ements A. FOLLOWING PATTERN: 
: N 


Be Be Oe Oe Oe Oe 
nw 
= 
oO 
o 
vw 
~m 


AFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING 
:PAIR OF NO.S IF SWO9=1 OR GO ON TO TEST THE NEXT PAIR IF SwO9=0 


-aeerreretererrerrrererererrereereererrereeerereeeeeeeeeeeereeeeee 


181724: 


SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #724,R0 ;;LOAD RO WITH TEST NUMBER 
1$: MOV #WANDTAB+4 RS :R5 POINTS TO TABLE OF TEST NO.S 
MOV PC ,a#SLPERR ;LOOP ONLY ON FAILING PAIR OF #°S 
CMP =(R5) ,-(R5) ;RESET RS TO POINT TO BAD GUYS 
3; (OR NULL ENTRY FIRST —s THROUGH ) 
4$: TST (R5)¢ ;POINT TO A SOURCE OPR 
CMP WANDTAB+62,R5 ;DONE ALI  etraencs ? 
BEQ 5$ ;BR IF 
MOV (R5)+,R1 ;LOAD ThE ” SRC oP 
MOV (R5)+,R3 ;LOAD THE DEST OP 
ccc :SCOPE SYNC 
28: BIC R1,R3 ;TEST THE ‘‘AND"’ 
CMP R3,(R5) RESULT CORRECT ? 
BEQ 4% :BR IF YES = GET THE NEXT PAIR 
MOV (R5),R4 ;GET THE S / B DATA 
MOV ~(R5) ,R2 ;GET DEST OP 
3$: ERROR i0 ;ALU “‘AND'* FAILED 
TST (R5)¢ ;CORRECT R5 POINTER 
BR 4$ 3GO GET NEXT PAIR 
5$: MOV #1, Q#SLPERR ;LOOP FROM BEGINNING ON ERROR 
peeeeerrererererrrereserreretereeerreteerAeKeReeeReeeeeeee eee 
TeTEST 725 ALU ‘‘OR'' FUNCTION TEST USING BIS INSTRUCTION 


THIS TEST VERIFIES THAT THE ALU "OR" FUNCTION RESPONDS CORRECTLY 
TO ALL POSSIBLE COMBINATIONS FOR EACH OF THE 16 BIT POSITIONS 
317 EXECUTES THE BIS INSTRUCTION FOR THE FOLLOWING PAIRS OF 
[OPERANDS AND TESTS FOR THE INDICATED RESULT: 


SEQ 0262 
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es J ;SOURCE OP DEST. OP RESULT 
14158 3000000 000000 000000 
14159 2177777 177777 177777 
14160 3000000 177777 177777 
14161 7777 000000 177777 
14162 3125252 125252 125252 
14163 3052525 052525 052525 
14164 3125252 052525 177777 
ete 1052525 125252 177777 
14167 ;THE 8 PAIRS OF NO.S AND THE ANSWERS ARE STORED IN A TABLE TAGGED 
14168 ;""ORTAB’’ IN THE FOLLOWING PATTERN: 
14169 ;ORTAB: NULL 
14170 ; SRC OP1 
14171 : DST OP1 
14172 : ANS1 
14173 3 SRC OP2 
14174 Z DST OP2 
14175 3 ANS2 
14176 ; ETC. 
14177 
14178 sAFTER REPORTING THE ERROR THE ROUTINE WILL LOCK ON THE FAILING 
14179 ;PAIR OF NO.S IF SWO9=1 OR GO ON TO TEST THE NEXT PAIR IF Sw09=0 
14180 TORR RARBAAAABAAAAAARABABRARARRARERRRRRRARAREEEEEER ERE SERRE AAAS ERAS | 
14181 0532464 11725: 
14182 053244 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
14183 053246 012700 000725 MOV #725,R0 :;LOAD RO WITH TEST NUMBER 
14184 053252 012705 063500 1$: MOV #ORTAB+4,R5 7R5 POINTS TO TABLE OF TEST NO.S 
14185 053256 010757 001010 MOV PC ,a#SLPERR ;LOOP ONLY ON FAILING PAIR OF #°S 
14186 053262 024545 CMP =(R5),-(R5S) :RESET RS TO POINT TO BAD GUYS 
14187 ; (OR NULL ENTRY FIRST TIME THROUGH) 
14188 053264 005725 4$: TST (R5)¢ POINT TO A SOURCE OPR 
14189 053266 022705 063556 CMP #ORTAB*+62,R5 ;DONE ALL COMBINATIONS ? 
. 14190 053272 001413 BEQ 5$ 3sBR IF YES 
14191 053274 012501 MOV (R5)+,R1 sLOAD THE SRC OP 
14192 053276 012503 MOV (RS)4+,R3 ;LOAD THE DEST OP 
sates 053300 000257 ccc : SCOPE SYNC 
4194 
wd 053302 050103 28: BIS R1,R3 sTEST THE ‘‘OR'' 
4 
14197 053304 020315 CMP R3,(R5) ;RESULT CORRECT ? 
ppb 053306 001766 BEQ 4$ :BR IF YES - GET THE NEXT PAIR 
141 
14200 053310 011504 MOV CRS) RS ;GET THE S / B DATA 
14201 053312 014502 MOV -(R5),R2 3GET DEST OP 
pe 053314 104010 3$: ERROR 10 sALU “‘OR'’ FAILED 
4 
142046 053316 005725 TST (RS)¢ sCORRECT RS POINTER 
ieee 053320 000761 BR 4% 360 GET NEXT PAIR 
4 
14207 053322 012737 053252 001010 S$: MOV #1%,Q#SLPERR :LOOP FROM BEGINNING ON ERROR 
sons sl eereerevererereereeerecrererererererereeneeneergrernenereterese 
14210 s*TEST 726 INC / DEC / ADD TEST = CYCLE NO.S 000000-077777 


14211 ;THIS TEST COMBINES THE INC / DEC / ADD INSTRUCTIONS IN THE FOLLOWING 





CQKDA-D kD11-K BASIC oe! € TESTS 
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14227 053330 
14228 053330 000004 
14229 ee teee Rotaee 000726 


14233 053344 010737 001010 
14235 053352 000987 
14237 053354 060103 
14240 053356 020403 
14241 053360 001402 
14243 053362 104010 
14245 053364 000407 
14247 053366 005201 


14250 053374 000765 
14252 053376 012737 053336 001010 


26 


F 5 
si 30A(1052) 11-SEP-79 13:53 PAGE 265 


INC / DEC / ADD TEST = CYCLE NO.S 000000-077777 


sTEST SEQUENCE: 


31. BOTH SOURCE AND DEST OPS ARE ZEROED 

32. THE TWO NO.S ARE ADDED AND THE RESULT COMPARED WITH 000000 
3. THE SOURCE OP !S_ INCREMENTED 

4. THE DEST OP 1S DECREMENTED 

5. See AM -3, AND 4 ARE REPEATED UNTIL THE SOURCE OP GOES 


;0N DETECTION OF A NON-ZERO RESULT THE ERROR 1S REPORTED AND THEN IF: 


. 
° 


TS1726: 


10$: 


1$: 


23: 


3$: 


4$: 


5$: 


1. SWO9=0 THE TEST IS EXITED 


2. SWO9=1 THE ROUTINE LOCKS ON THE FAILING PAIR OF OPERANDS 
;yeeteeerererrerererererererereereeererereReeeeKeKeeeRekeereeeeeee 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #726,R0 :;LOAD RO WITH TEST NUMBER 
CLR R1 INITIALIZE REGS TO 000000 
CLR R2 
CLR R4 
MOV PC ,a#SLPERR ;LOOP ONLY ON FAILING PAIR OF #°S 
MOV R2,R3 ;LOAD DEST OPERAND 
ccc ;SCOPE SYNC 
ADD R1,R3 ;ADD THE TWO TEST NO.S 
;RESULT S / B = 000000 
CMP R4,R3 ;RESULT = 000000 ? 
Brea 4$ 7BR IF YES 
ERROR 10 ; INCORRECT RESULT IN R3 
BR TS1727 7;EXI1T TO NEXT TEST 
INC R1 ;ADD 1 TO SOURCE OP 
BM] 5$ ;GET OUT IF IT WENT NEGATIVE 
DEC R2 ;SUB 1 FROM THE DEST OP 
BR 1$ ;GO ADD THE TWO NO.S 


MOV #10$,a#SLPERR  ;LOOP FROM BEGINNING ON ERROR 


; MRR eKeReeeeeeeketeeeeeereekeeetereekeeeerereresene 


>eTEST 727 


INC / DEC / ADD TEST = CYCLE NO.S 077777-000000 


;THIS TEST COMBINES THE INC / DEC / ADD INSTRUCTIONS IN THE FOLLOWING 
; TEST SEQUENCE: 


31. BOTH SOURCE AND DEST OPS ARE ZEROED 
32. THE TWO NO.S ARE ADDED AND THE RESULT COMPARED WiTH 000000 
33. THE SOURCE OP 1S DECREMENTED 

34. THE DEST OP 1S INCREMENTED 

75. STEPS 2,3, AND 4 ARE REPEATED UNTIL THE DEST. OP GOES 

: NEGATIVE 


Ww 


ON DETECTION OF A NON-ZERO RESULT THE ERROR IS REPORTED AND THEN IF: 





SEQ 0264 
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053426 
053430 
053432 
053434 
053436 
053440 
053442 
053444 
053446 
053450 


053452 


053460 


053514 
053516 
053520 


053526 
053530 
053532 


053534 
053536 


11-SEP-7 


000004 
Baseet 


0 
000257 
060103 
020403 
001402 
104010 
000407 
005202 
100402 
005301 
000765 


012737 


000004 


000277 
070205 


100403 
001402 
102401 
103001 


104044 
020304 


001002 
020102 


000727 


001010 


053412 


000730 
053516 


000006 
000002 


000003 


001010 


001076 


6 5 
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727 INC / DEC / ADD TEST = CYCLE NO.S 077777-000000 SEQ 0265 


1, SWO9=0 THE TEST IS EXITED 


; 2. SWO9=1 THE ROUTINE LOCKS ON THE FAILING PAIR OF OPERANDS 
M ;; eererererrerrererrerererererererrrereererereerenerenerereenerer 
TS1727: 

SCOPE ;CALL THE SCOPE LOOP UTILITY 

MOV #727,R0 3s LOAD RO WITH TEST NUMBER 
108: CLR R1 : INITIALIZE REGS TO 000000 

CLR R2 

CLR RG 

MOV PC ,a#SLPERR ;LOOP ONLY ON FAILING PAIR OF #'S 
1$: MOV R2,R5 ;LOAD DEST OPERAND 

ccc ;SCOPE SYNC 
23: ADD R1,R3 sADD THE TWO TEST NO.S 

sRESULT S / B = 000000 

CMP R4,R3 ;RESULT = 000000 ? 

BEQ 4% 7BR IF YES 
3$: ERROR 10 s INCORRECT RESULT IN R3 

BR 181730 3:60 TO SCOPE EXIT 
4%: INC R2 :ADD 1 TO DEST. OP 

BM] 5$ sGET OUT IF IT WENT NEGATIVE 

DEC R1 :SUB 1 FROM THE SOURCE OP 

BR 1$ 3;GO ADD THE TWO NO.S 
5$: MOV #10$,a#SLPERR ;LOOP FROM BEGINNING ON ERROR 
pp ereererererererrrererereerereerereeerAeeeeeAeenAKeneeereneerense 
:*TEST 730 MUL RA,RB TEST ; N:C = 1111 
p_eeeereerereerererererereeererererterererenenereReeenerenereenee 
781730: 

SCOPE ¢ CALL THE SCOPE LOOP UTILITY 

MOV #730,R0 sLOAD RO WITH TEST NUMBER 

MOV ores aasTMPo GET TEST INSTRUCTION WORD 

CLR 3$/B RESULT IN R2 

MOV so. :$/B RESULT IN R3 

MOV #2,R2 s INITIALIZE REG 

CLR R3 sINITIALIZE REG + 1 

MOV #3.R5 s INITIALIZE SRC 

Scc :SCOPE SYNC 
2%: MUL R5,R2 :TEST THE MUL 

BM! 3$ 7N:C=0000? 

BEQ 3$ 

Bvs 3$ 

BCC 4% 
3$: ERROR 44 sCOND CODES SET IMPROPERLY 
4$: CMP R3,R4 sREG*+1 CORRECT? 

BNE 5$ ;BR IF NOT 

CMP R1,R2 sREG CORRECT? 


_ 
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14324 


053540 
053542 


053544 


053610 
053612 
053614 
053616 


053620 


053630 
053632 


053634 


053672 
053674 
053676 


053704 


11-SEP-79 
001401 
104045 


000004 


000257 
070215 
100403 
001402 
102401 
103401 
104044 


020304 


001401 
104045 


000004 


000257 
070225 


100403 
001002 
102401 
103001 


TEST 
13:31 


000731 
053606 


123450 
012345 


063312 
000010 


000732 
053674 


Ss 


001076 


001076 


ss SOA(1052) 11-SEP-79 


ao =z 


13:58 PAGE 267 
1730 MUL RA,RB TEST ; W:C = 1111 SEQ 0266 

BEQ 181731 3;BR IF YES 
5$: ERROR 45 sMUL DELIVERED WRONG RESULT 
pp ertteerrerrererrrrrerrerrerreerrerererrereeereeeeReeererereeeeEe 
s*TEST 731 MUL (RA),RB TEST ; N:C = O000-SET C 
sy eeeererererrerreeererereererererrererereneeeeeeeeneeeereeeerene 
181731: 

SCOPE ¢ CALL THE SCOPE LOOP UTILITY 

MOV #731,R0 ;LOAD RO WITH TEST NUMBER 

MOV a#2$,aa#STMPO GET TEST 1 we WORD 

CLR R1 38/B RESULT INR 

MOV #123450,R4 :$/B RESULT IN R3 

MOV #012345,R2 s INITIALIZE REG 

CLR R3 s INITIALIZE REG + 1 

MOV #MBUFO,RS ;SET UP POINTER TO SRC 

MOV #10, (R5) s INITIALIZE SRC 

ccc ;SCOPE SYNC 
2s: MUL (R5),R2 sTEST THE MUL 

BM] 3$ 3N:C=0001? 

BEQ 3% 

BvS 3% 

BCS 4$ 
3$: ERROR 44 sCOND CODES SET IMPROPERLY 
4$: CMP R3,R4 sREG+1 CORRECT? 

BNE 5$ ;BR IF NOT 

CMP R1,R2 sREG CORRECT? 

BEQ 181732 3:BR IF YES 
5$: ERROR 45 sMUL DELIVERED WRONG RESULT 
rN ee ee 
s*TEST 732 MUL (RA)+,RB TEST ; N:C = OOOO-SET 2 
ppeeerererrerereeererrerererereerererererennereReeeesanetereeeNes 
181732: 

SCOPE 7 CALL THE SCOPE LOOP UTILITY 

MOV #732,R0 :LOAD RO WITH TEST NUMBER 

MOV a42$,aaSTMPO0 GET TEST INSTRUCTION WORD 

CLR R1 38/B RESULT IN R2 

CLR R4 :$/B RESULT IN R3 

CLR R2 s INITIALIZE REG 

MOV #-1,R3 s INITIALIZE REG + 1 

MOV #MBUFO,RS ;SET UP POINTER TO SRC 

MOV #10,(R5) sINITIALIZE SRC 

ccc ;SCOPE SYNC 
23: MUL (R5)+,R2 sTEST THE MUL 

BM] 3$ =N:C=0100? 

BNE 3$ | 

BvS 3$ 

acc ti«é«wKS 
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CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE e 
CQKDAD.P11 11-SEP-79 13:31 1732 MUL (RA)+,RB TEST ; N:C = 0000-SET Z SEQ 0267 
14380 
Hot + + 053706 104044 3$: ERROR 44 ;COND CODES SET IMPROPERLY 
14383 053710 020304 4$: CMP R3,R4 ;REG+1 - ppg 
14384 053712 001002 BNE 5$ :BR IF N 
146385 053714 020102 CMP R1,R2 ;REG CORRECT? 
eaet 053716 001401 BEQ é$ :BR IF YES 
ees 053720 104045 5$: ERROR 45 ;MUL DELIVERED WRONG RESULT 
14390 053722 022705 063314 6$: CMP #MBUFO+2,R5 3010 R5 - AUTO=INCREMENTED? 
My 244 053726 001401 BEQ 1S1733 BR IF 
seaee 053730 104046 ERROR 46 ;AUTO INCREMENT DID NOT OCCUR 
14395 -eeeeeeereerreerererereerererreeererereteReeeeeKeteeeReeereReeee 
14396 TSTEST 733 MUL @(RA)+,RB TEST ; N:C = OO00-SET N ; SRC,DST = -,¢ 
14397  ceneeceetereerrerteeeerereereeeereterteererererereererereerrete 
14398 053732 181733: 
14399 053732 000004 SCOPE ¢CALL THE SCOPE LOOP UTILITY 
14400 053734 012700 000733 MOV #733,R0 LOAD RO WITH TEST NUMBER 
14401 053740 013737 054000 001076 MOV a#2$ ,aaeSTMPO GET TEST INSTRUCTION WORD © 
14402 053746 012701 177777 MOV #-1,R1 7$/B RESULT IN R2 
14403 053752 012704 177770 MOV #-10,R4 :$/B RESULT IN R3 
14404 053756 012702 000001 MOV #1,R2 INITIALIZE REG 
14405 053762 005003 CLR R3 INITIALIZE REG + 1 
14406 053764 012705 063306 MOV WATA+10,R5 7SET UP POINTER TO POINTER TO MBUFO 
14407 053770 012737 177770 063312 MOV #-10,a#MBUFO s INITIALIZE SRC 
eee 053776 000257 ccc ; SCOPE SYNC 
ete 054000 070235 23: MUL a(R5)+,R2 : TEST THE MUL 
14412 054002 100003 BPL 3$ 3N:C=1000? 
14413 054004 001402 BEQ 3$ 
14414 054006 102401 BvS 3$ 
eeae 054010 103001 BCC 4% 
en 054012 104044 3$: ERROR 4h ;COND CODES SET IMPROPERLY 
4G 
14419 054014 020304 4$: CMP R3,R4 ;REG+1 CORRECT? 
14420 054016 001002 BNE 5$ ;BR IF NOT 
14421 054020 020102 CMP R1,R2 ;REG CORRECT? 
pre 1 054022 001401 BEQ 6$ ;BR IF YES 
Hira 054024 104045 5$: ERROR 45 ;MUL DELIVERED WRONG RESULT 
4&4 
14426 054026 022705 063310 6$: CMP MATA12,R5 7D1D RS GET AUTO-INCREMENTED? 
ors 4 054032 001401 BEQ TS1734 ;;BR IF YES 
4& 
14429 054034 104046 ERROR 46 ;AUTO INCREMENT DID NOT OCCUR 
on ppeeeeereereveeertereereerererereeertereeeteteteeeeeeeeeeteee TEE 
14432 TEST 734 MUL -(RA),RB TEST ; N:C = 1117-CLR ALL BUT N ; SRC,DSK = *,- 
14433 ppeeeeeererenreererereeereeteeereerereeeeeeeeeeenerenenterereeTese 
14436 054036 181734: 


14435 054036 000004 SCOPE CALL THE SCOPE LOOP UTILITY 





35 re ae | 
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CQKDAD.P11 =: 11-SEP-79 13:31 1734 MUL -(RA),RB TEST ; N:C = 1111-CLR ALL BUT N ; SRC,DSK = +,- SEQ 0268 
14436 054040 012700 000734 MOV #734,R0 :;LOAD RO WITH TEST NUMBER 
14437 054044 013737 054104 001076 MOV a#2$.aeSTMPO :GET TEST INSTRUCTION WORD 
14438 054052 012701 177777 MOV -1,R1 :$/B RESULT IN R2 
14439 054056 012704 177770 MOV #-10,R4 °$/B RESULT IN R3 
14440 054062 012702 177777 MOV #-1,R2 S INITIALIZE REG 
14441 054066 005003 CLR R3 S INITIALIZE REG + 1 
14442 054070 012705 063314 MOV #MBUFO+2,R5 :SET UP POINTER TO SRC 
14443 054074 012737 000010 063312 MOV #10, a#MBUFO S INITIALIZE SRC 
164ug 054102 000277 SCC :SCOPE SYNC 
ere 054104 070245 2$: MUL -(R5) ,R2 sTEST THE MUL 
14448 054106 100003 BPL 3% :N:C=1000? 
14449 054110 001402 BEQ 3$ 
14450 054112 102401 BVS 3$ 
14451 054114 103001 BCC 4$ 
coake 054116 104044 3$: ERROR 4&4 sCOND CODES SET IMPROPERLY 
4 
14455 054120 020304 4$: CMP R3,R4 ;REG+1 CORRECT? 
14456 054122 001002 BNE 5$ “BR IF NOT 
14457 054124 020102 CMP R1,R2 sREG CORRECT? 
pre 054126 001401 BEQ 6$ sBR IF YES 
cant 054130 104045 5$: ERROR 45 sMUL. DELIVERED WRONG RESULT 
446 
14462 054132 022705 063312 6$: CMP #MBUFO,RS sDID SRC REG GET AUTO-DECREMENTED? 
penar 054136 001401 BEQ 181735 : BR IF YES 
4 
14465 054140 104046 ERROR 46 ;AUTO DECREMENT DID NOT OCCUR 
er | ppeeeeererererererrerrererererereeeerererereKeneeKKereeneeeeeeeees 
14468 s*TEST 735 MUL @-(RA).RB TEST ; N:C = 11117-CLR ALL BUT C ; SRC,DST = -,- 
14469 ppeeererrereterreeerrrerererererrerereeeKeeKeeKeKeeKeKeeeeeeeeees 
14670 054142 1$1735: 
14471 054142 v00004 SCOPE #CALL THE SCOPE LOOP UTILITY 
14472 054144 012700 000735 MOV #735,R0 :LOAD RO WITH TEST NUMBER 
14473 054150 013737 054210 001076 MOV a#2$,aaSTMPO “GET TEST INSTRUCTION WORD 
14474 054156 005001 CLR R1 :S$/B RESULT IN R2 
14475 054160 012704 106420 MOV #106420,R4 :/S/B RESULT IN R3 
14476 054164 012702 177776 MOV #-2,R2 s INITIALIZE REG 
14477 054170 012703 177777 MOV #-1.R3 S INITIALIZE REG + 1 
14478 054174 012705 063310 MOV MATA+12,R5 :SET UP POINTER TO POINTER TO MBUFO 
14479 054200 012737 134570 063312 MOV #-43210.a#MBUF) : INITIALIZE SRC 
14480 054206 000277 SCC :SCOPE SYNC 
44 
144B2 054210 070255 2$: MUL a-(R5) ,R2 STEST THE MUL 
44 
14484 054212 100403 BM] 3$ :N:C=0001? 
14485 0542146 001402 BEQ 3$ 
14486 054216 102401 BVS 3$ 
14487 054220 103401 BCS i$ 
44 
14489 054222 104044 3$: ERROR 44 sCOND CODES SET IMPROPERLY 
| 


14491 054224 020304 4%: CMP R3,R4 ;REG+1 CORRECT? 
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054226 
054230 
054232 
054234 


054236 
054242 


054244 


054246 


054310 
054314 


054322 
054324 
054326 


054334 
054336 


054340 


054402 


11-SEP-79 


001002 


104045 


022705 
001401 


104046 


000004 


005065 
000277 


070265 
100403 


103001 
104044 
020304 
001002 
020102 
001401 


104045 


13:31 


063306 


000736 
054310 001076 


012345 
177777 
063312 
000002 


000002 


000737 
054404 001076 


000100 
000010 


063276 
000010 063312 


K 5 
23 


53 PAGE 270 
= 111 

:BR IF NOT 
;REG CORRECT? 
:BR IF YES 


;MUL DELIVERED WRONG RESULT 


3D1D RS GET AUTO-DECREMENTED? 
7:BR IF YES 


;AUTO INCREMENT DID NOT OCCUR 


sy ereererrerererereererererereeererereeeeeeReeeKAeeeeKeeeeReeAeeee 


MUL X(RA),RB TEST ; N:C = 1111 TO 0100 


sp eeeeeerereererererrereeeeeeee eee Ke HeKeKeKeKeKKKeKKeeAAeAeHeKAee 


MACY11 30A(1052) 11-SEP-79 

1735 MUL @-(RA),RB TEST ; 
BNE 5$ 
CMP R1,R2 
BEQ 6$ 

5$: ERROR 45 

6$: CMP #ATA*10,R5 
BEQ 181736 
ERROR 46 

s*TEST 736 

1S1736: 
SCOPE 
MOV #736,R0 
MOV a#2$,aaSTMPO 
CLR R1 
CLR RG 
MOV #012345,R2 
MOV #-1,R3 
MOV #MBUFO,RS 
CLR 2(R5) 
Scc 

23: MUL 2(R5),R2 
BMI 3$ 
BNE 3$ 
BvS 3$ 
BCC 4$ 

3$: ERROR 44 

4$: CMP R3,R4 
BNE 5$ 
CMP R1,R2 
BEQ 181737 

5$: ERROR 45 


;CALL THE SCOPE LOOP UTILITY 
;;LOAD RO WITH TEST NUMBER 
;GET TEST INSTRUCTION WORD 
;$/B RESULT IN R2 

3$/B RESULT IN R3 
INITIALIZE REG 

s INITIALIZE REG + 1 

;SET UP POINTER TO SRC 
INITIALIZE SRC 

> SCOPE SYNC 


sTEST THE MUL 
3N:C€=0100? 


;COND CODES SET IMPROPERLY 


;REG+1 CORRECT? 
3BR IF NOT 

;REG CORRECT? 
3;:BR IF YES 


MUL DELIVERED WRONG RESULT 


ppeeeererererereerereerererrereeeeererereRteeeeeeeeKenAreeeeeeTes 


MUL @X(RA),RB TEST 


sp tererererereerereerererenereseerereerenaneeeReneeneeeAeeeeeeEee 


s*TEST 


TS1737: 


737 


#737,R0 
pin miateaning 
#100,R4 

+ laa 


WATA,RS 
410, asMBuFO 


eCALL THE SCOPE LOOP UTILITY 
;LOAD RO WITH TEST NUMBER 

GET TEST INSTRUCTION WORD 

3$/B RESULT IN R2 

:$/B RESULT IN R3 

s INITIALIZE REG 

s INITIALIZE REG + 1 

;GET POINTER TO TABLE OF POINTERS 

INITIALIZE SRC 

SCOPE SYNC 


1=CLR ALL BUT C ; SRC,DST = -,- 


SEQ 0269 


_ 
11 S0A(1052) 11-SEP-79 13:53 PAGE 271 


CQKDA-D KD11-K BASIC LOGIC TESTS MACY 
CQKDAD.P11 11-SEP-79 13:31 1737 MUL @X(RA),RB TEST SEQ 0270 
14548 
Meeen 054404 070275 000010 23: MUL Q10(R5) ,R2 ;TEST THE MUL 
14551 054410 020304 CMP R3,R4 ;REG+1 CORRECT? 
14552 054412 001002 BNE 3$ [BR IF NOT 
14553 054414 020102 CMP R1,R2 ;REG CORRECT? 
et 054416 001401 BEQ TS1740 > BR IF YES 
gee 054420 104045 3$: ERROR 45 ;MUL DELIVERED WRONG RESULT 
14558 | jana pitt gta a atte 
14559 s*TEST 740 DIV @N,RA TEST ; N:C = 1111 
14560 ppeeeeeeeererrerereerererreeeteterereeeeeeeAeeeKeeeeeeeeeeeTeee 
14561 054422 181740: 
14562 054422 000004 SCOPE ¢ CALL THE SCOPE LOOP UTILITY 
14563 054424 012700 000740 MOV #740,R0 sLOAD RO WITH TEST NUMBER 
14564 054430 013737 054456 001076 MOV a#2$ ,a#STMPO GET COPY OF TEST INSTRUCTION 
14565 054436 012701 010000 MOV #010000,R1 3$/B RES IN R2 
14566 054442 012704 000001 MOV #1,R4 :$/B RES IN R3 
14567 054446 005002 CLR R2 ;SET UP REG OPERAND 
14568 054450 012703 020001 MOV #020001,R3 3SET UP REG+1 OP 
pts 054454 000277 scc ;SCOPE SYNC 
et 1A 054456 071227 000002 2s: Div #2,R2 : TEST DIV 
14573 054462 100403 BM] 3$ 7N:C=0000? 
14574 054464 001462 BEQ 3$ 
14575 054466 102401 BvS 3$ 
oe th 054470 103001 BCC 4$ 
+444 | 054472 104044 3$: ERROR 44 ;COND CODES SET IMPROPERLY 
4 
14580 054474 020304 4$: CMP R3,R4 ;CORRECT RESULT IN REG+1? 
14581 054476 001002 BNE 5$ ;BR IF NOT 
14582 054500 020102 CMP R1,R2 ;CORRECT RESULT IN REG? 
eine 054502 001401 BEQ TS1741 >I BR IF VES 
14585 054504 104045 5$: ERROR 45 sD1V DELIVERED WRONG RESULT 
Lee + | timate ca al talon bn iatatitiae 
14588 s*TEST 741 DIV #N,RA TEST ; RA NEGATIVE ; N:C = 0000 
14589 p_eeeenecereerereerererrereeererereeeeeereneeeeneeeeeeeeeeteeeees 
14590 054506 TST741: 
14591 054506 000004 SCOPE #CALL THE SCOPE LOOP UTILITY 
14592 054510 012700 000741 MOV #741,R0 ;LOAD RO WITH TEST NUMBER 
14593 054514 013737 054544 001076 MOV a#2$,aeSTMPO GET COPY OF TEST INSTRUCTION 
14594 054522 012701 177775 MOV #-3,R1 :$/B RES IN R2 
14595 054526 012704 177776 MOV #-2,R4 38/B RES IN R3 
14596 054532 012702 177777 MOV #-1,R2 7SET UP REG OPERAND 
14597 054536 012703 177762 MOV #-14.,R3 ;SET UP REG+1 OP 
pt os 054542 000257 ccc :SCOPE SYNC 
4 
ra] 054544 071227 000004 2$: Div #4 ,R2 : TEST DIV 
4 
14602 054550 100003 BPL 3$ 3N:C€=1000? 


14603 054552 001402 BEQ 3$ 
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102401 
103001 


104044 
020304 
001002 
020102 
001401 


104045 


CQKDAD.P11 


054554 
054556 


054560 
054562 


054570 
054572 


054574 
000004 


000257 
071227 
100403 


054624 
054626 
054632 


054640 
054642 
054644 
054646 
054650 
054652 


054654 


103001 
104044 
020304 
001002 
020102 
001401 


104045 


054656 


054710 
054712 


€ TESTS 
13:31 


000742 
054626 


000001 
000001 


000002 


000743 


000002 
000016 


177774 


001076 


001076 


5 
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1741 DIV #N,RA TEST ; RA NEGATIVE ; N:C = 0000 
BVS 3$ 
BCC 4% 
3$: ERROR 44 COND CODES SET IMPROPERLY 
4$: CMP R3,R4 ;CORRECT RESULT IN REG+1? 
BNE 5$ :BR IF NOT 
CMP R1,R2 ;CORRECT RESULT IN REG? 
BEQ TST742 :;BR IF YES 
5$: ERROR 45 DIV DELIVERED WRONG RESULT 


a eee ee 
s*TEST 742 Div #N,RA TEST ; N:C = 0000 T0 0100 

sy eteeererereererreeerrrererereereeeeteeeeKeneeeeAeeereReeeeeeeees 
TS1T742: 

7 CALL THE SCOPE LOOP UTILITY 

MOV #742,R0 ;LOAD RO WITH TEST NUMBER 

MOV “Nappies: GE COPY OF es INSTRUCTION 


MOV #1,R4 8/8 RES IN R3 
CLR R ;SET UP REG OPERAND 
MOV #1,R3 ;SET UP REG+1 OP 
ccc ;SCOPE SYNC 
2$: DIV #2,R2 ;TEST Div 
BM! 3$ 3N:C=0100? 
BNE 3$ 
BVS 3$ 
BCC 4% 
3$: ERROR 44 ;COND CODES SET IMPROPERLY 
4$: CMP R3,R4 el a i IN REG+1? 
BNE 5$ :BR IF 
CMP R1,R2 ‘CORRECT ORESULT IN REG? 
BEQ TS1T743 73BR IF YES 
5$: ERROR 45 :D1V DELIVERED WRONG RESULT 


pyetererereeeeeeereterererretereeeeereeeeeenaeKeeeeenee eee eee 


zs" TEST 743 DIV #-N,RA TEST ; RA POS 


syeeererreeerererringererrrreeeererereeeneeAeeeeeeeeeeeeee eee 


TS1743: 
¢CALL THE SCOPE LOOP UTILITY 
MOV #743,R0 sLOAD RO WITH TEST NUMBER 
MOV are GET COPY ae INSTRUCTION 


MOV :$/B RES IN 
MOV #2,R4 3S/B RES _IN R3 
CLR R2 SET UP REG OPERAND 
MOV #14.,R3 ;SET UP REG+1 OP 
ccc :SCOPE SYNC 

2$: DIV #=4 ,R2 TEST Div 


SEQ 0271 





N 5 
CQKDA-D KD11-K BASIC LOG! 1¢ TESTS 11 vale = l1- oy A it at PAGE 275 
CQKDAD.P11 11-SEP-79 13:31 DIV #-N,RA TEST ; SEQ 0272 


054716 020304 R3,R4 sCORRECT RESULT IN REG+1? 
3$ BR IF NOT 


R1,R2 CORRECT RESULT IN REG? 
054724 001401 , TST744 :3BR IF YES 


054726 104045 : 45 DIV DELIVERED WRONG RESULT 


sp eeeeererrrrrereeeeererererererenereereeeeeAeAAeeKeAReKeeeeeAeee 


s*TEST 744 Div TEST - V BIT GETS SET 
THIS TEST TESTS THAT THE V BIT CAN BE SET IN ALL THE 
POSSIBLE WAYS. SINCE THE INSTRUCTION SHOULD BE ABORTED, THE 
RESULTS CANNOT BE GUARANTEED. FOR THIS REASON, ONLY 
THE CONDITION CODES ARE CHECKED. 


SARAH AEAHAAAEAEAAEEATAAAATERAATAATAAAAAAAAAAAAERAEARARTAAAEAE 
054730 


000004 ;CALL THE SCOPE LOOP UTILITY 
000744 Vv ’ :;LOAD RO WITH TEST NUMBER 
+eyed WITH TEST INSTRUCTION WORD 
;CLEAR OUT OTHER PSW BITS 
054752 012702 000050 . ;SET UP REG OP 
054756 071227 000005 : . TEST DIV -- SHOULD ABORT 


054762 100424 3N:C=0010? 


054770 103421 


054772 012702 177777 INITIALIZE REG OP 
054776 005003 R3 sINITILAIZE REG+1 OP 


055000 071227 177776 7 TEST DIV -- SHOULD ABORT 
100413 3N:C€=0010? 


055012 103410 

055014 012704 000003 :S/B PSW 

055020 071227 000000 ;TEST DIV BY 0 == SHOULD ABORT 
055024 100403 3N:C=0010? 


3$ 
055032 103405 TS1745 331F ALL OK, THEN EXIT TEST 


055034 013703 : a#PSw R35 ;GET WAS PSW 
055040 012702 #PSW,R2 DESTINATION IS PSW 


055044 104001 ERROR 1 :CONDITION CODES SET WRONG 
+ eeeerereretereerereeeeteereeeeeeeeeeeeeeeeeeeeeeeeeeee eee eee 


TeTEST 745 ASH WN,RA TEST ; SHIFT LEFT ; N:C = 0000 TO 1010 


s_eeeereresteerrererereerereseerererreneeaeeeeeeeeeeeeneeeseeeeTe 
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CQKDAD.P11 


055064 
055070 
055072 
055076 


055110 
055112 
055114 


055116 


055140 
055142 
055146 


055154 
055156 


11-SEP- 


103401 
104002 
020504 


001401 
104002 


yeas a 


000746 
055142 


000004 


177775 


123432 
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ASH @N,RA TEST ; SHIFT LEFT = W:C = 0000 TO 1010 SEQ 0273 
TS1745: 

SCOPE sCALL THE SCOPE LOOP UTILITY 

ROV #745,R0 >: LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD RI _ TEST INSTRUCTION WORD 

MOV #123450,R4 33/8 RESUL 

MOV #112345,R3 S INITIAL a 

ccc ;SCOPE SYNC 
28: ASH #3,R3 ;TEST THE ASH 

BPL 3$ 7N:C=1010? 

BEQ 3$ 

BvC 3% 

BCC 4$ 
3$: ERROR 2 ; INCORRECT CONDITION CODES 
4$: CMP R3,R4 > CORRECT RESULT? 

BEQ TS1746 yYES 

ERROR 2 ASH DELIVERED WRONG RESULT 
tentang atleast tag tatiana pari ttm gba nh 
s*TEST 746 ASH #N,RA TEST ; SHIFT RIGHT ; N:C = 1000 TO 0101 
ppeeeeeerererereeerererereereerrerereereeeeereKeneeeenereereeNees 
TS1746: 

SCOPE :CALL THE SCOPE LOOP UTILITY 

MOV #746,R0 >: LOAD RO WITH TEST NUMBER 

MOV a#2$,R1 sLOAD R1 WITH TEST INSTRUCTION WORD 

CLR R4 :$/B RESULT 

MOV #4 R3 > INITIAL REG 

ccc sSCOPE SYNC 

SEN ;CODES = 1000 
23: ASH #-3,R3 sTEST THE ASH 

BMI 3$ 7N:C=0101? 

BNE 3$ 

BvVS 3% 

BCS 4% 
3$: ERROR 2 s INCORRECT CONDITION CODES 
4$: CMP R3,R4 ;CORRECT RESULT? 

BEQ 181747 SBR IF YES 

ERROR 2 ASH DELIVERED WRONG RESULT 
ee ee ae teen 
s*TEST 747 ASH #N,RA TEST ; SHIFT LEFT ; N:C = 1111 TO 1000 
sp eeererrerreeerererererrreeerererereereReeeerereReeeeeR ETE TELE 
TST747: 

SCOPE # CALL THE SCOPE LJOP UTILITY 

MOV #747,R0 LOAD RO WITH TEST NUMBER 

MOV av2$,R1 + OAD R1 WITH TEST INSTRUCTION WORD 

MOV #177234,R4 :§/B RESULT 

MOV #123432,R3 INITIAL REG # 

$cc sSCOPE SYNC 
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CQKDAD.P11 


055212 
S222 18 


055224 
055226 


055266 
055272 
055274 
055300 
055302 
055304 
055306 
055310 
055312 
055314 
055316 


055520 
055322 


055524 


055354 


11-SEP-79 


072327 


103001 
104044 


020102 
001002 
020403 
001401 
104045 


000270 


1¢ 
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177772 


0 
Soerce 001076 


147653 


000003 


000751 
055356 001076 


000005 


MACY11 30A(1052) Vi-SEP=79 ‘48. 753 PAGE 275 
1747 ASH @N,RA TEST ; SHIFT LEFT ; N:C = 1111 TO 1000 


23: ASH #-6,R3 ; TEST THE ASH 
BPL 3$ 3N:C=1000? 
BEQ 3$ 
BvS 3$ 
BCC 4% 
3$: ERROR 2 s INCORRECT CONDITION CODES 
4%: CMP R3,R4 ; CORRECT — 
BEQ 181750 F 
ERROR 2 TASH DELIVERED WRONG RESULT 
Am og aaron eect te py iea ar tapmaialigt agg loan gt 
z*TEST 750 ASHC #N,RA TEST ; SHIFT LEFT ; N:C = 0000 TO 1010 
s,s ereeeerererererrrerrererreererrrreerererereeeeKeneeereeeeeeeeee 
TS1750: 
SCOPE ;CALL THE SCOPE LOOP UTILITY 
MOV #750,R0 > LOAD RO WITH TEST NUMBER 
MOV a#2$,aaSTMPO :GET TEST INSTRUCTION WORD 
MOV #123456, R1 :$/B RES IN R2 
MOV #076530.R4 3$/B RES IN R3 
MOV #112345,R2 s INITIALIZE COMBINED 
MOV #147653,R3 ; REGISTERS 
ccc sSCOPE SYNC 
23: ASHC #3,R2 sTEST ASHC 
BPL 3$ 3N:C=1010? 
BEQ 3$ 
Bvc 3$ 
BCC 4% 
38: ERROR 44 ;COND CODES WRONG 
4$: CMP R1,R2 sTOP HALF OF RESULT CORRECT? 
BNE 5$ = BR IF NOT 
CMP R4,R3 LOWER HALF OF RESULT CORRECT? 
BEQ T$1751 ;;BR IF YES 
5$: ERROR 45 :ASHC DELIVERED WRONG RES 


ama © ge + telat ag 2 pg ny ie tig lg et a ae 


TeTEST 751 ASHC #N,RA TEST ; SHIFT RIGHT ; N:C = 1000 TO 0101 


ps eeeerereeeerererrerererrererererrererereKeeeReNeeeeeeReeAe Te eese 


TST751: 


SCOPE CALL THE SCOPE LOOP UTILITY 
MOV #751,R0 ;;LOAD RO WITH TEST NUMBER 
MOV a#2$,aeSTMPO GET TEST INSTRUCTION WORD 
CLR R1 :$/B RES IN R2 

CLR R4 3S/B_ RES IN R3 

CLR R2 s INITIALIZE COMBINED 

MOV #5,R3 ; REGISTERS 

ccc SCOPE SYNC 

SEN CODES = 1000 


SEQ 0274 
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CQKDAD.P11 


055556 


O23 382 
055364 


055366 
055370 
055372 
055374 


055410 


055414 
055422 


055454 
055456 
055462 
055464 
055466 
055470 
055472 
055474 
055476 


055504 


11=SEP~79 
073227 
100403 
001002 
102401 
103401 
104044 
020102 


104045 


000004 
012700 


032737 
001401 


073227 
100003 


103401 
104044 


020102 
001002 
020403 
001401 
104045 
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177775 


000752 
100000 


177772 


063234 


001076 
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ASHC @N,RA TEST ; SHIFT RIGHT ; N: rs 1000 10 0101 SEQ 0275 
23: ASHC #-3,R2 sTEST ASHC 

BM] 3$ 3N:C=0101? 

BNE 3$ 

BvS 3% 

BCS 4% 
3$: ERROR 44 ;COND CODES WRONG 
4$: CMP R1,R2 ;TOP HALF OF RESULT CORRECT? 

BNE 5$ :BR IF NOT 

CMP RGR LOWER = OF RESULT CORRECT? 

BEQ 1$1752 R IF 
5$: ERROR 45 * ASHC DELIVERED WRONG RES 
sy eeeererereererererererrererererereeeeereKeeeeeeKeeReeeeeeeAee Aes 
s*TEST 752 ASHC @N,RA TEST : SHIFT RIGHT ; N:C = 1111 TO 1000 
; eeteerrererererrrrreerereererererererereneReeeeeKeeKeeeeeeereee 
TS1752: 

SCOPE > CALL THE SCOPE LOOP UTILITY 


MOV #752,R0 ;LOAD RO WITH TEST NUMBER 
.SBTTL USER CONTROLLED BREAKPOINi -- BITI5 
BIT #B1T15,a#BPTLOC ; ee ot HALT SET ?? 


BEQ +4 ; I 
HALT ;BREAK-DEPRESS CONTINUE TO CONTINUE 
MOV ares avsTMPo 3GET TEST INSTRUCTION WORD 
MOV #177234,R1 3$/B RES IN R2 
MOV #135275.,R4 38/8 RES IN R3 
MOV #123456.R2 s INITIALIZE COMBINED 
MOV #127542,R3 ; REGISTERS 
ccc ;SCOPE SYNC 
23: ASHC #-6,R2 3 TEST ASHC 
BPL 3$ 3N:C=1000? 
BEQ 3$ 
BvS 3$ 
BCS 4$ 
3$ ERROR 44 ;COND CODES WRONG 
4$ CMP R1,R2 ;TOP HALF OF RESULT CORRECT? 
BNE 5$ ;BR 1F NOT 
CMP R4,R5 ;LOWER HALF OF RESULT CORRECT? 
BEQ TS1753 :;BR IF YES 
5$ ERROR 45 ;ASHC DELIVERED WRONG RES 
-* 
he THIS SECTION OF THE MED TESTS EXERCISES CERTAIN SCRATCH 
3f PAD REGISTERS USING MED READS AND WRITES. THEIR ORIGINAL 
7° CONTENTS ARE RESTORED BuT: 
-* 
te eeereerreerereereee J MPORTANT NOTE eeeteeerenereerreere 
-¢ € * 
if * THE CONSOLE MUST NOT !!! BE USED DURING THESE MED * 
:t * TESTS. NO INTERRUPTS OR TRAPS CAN BE ALLOWED EITHER® 





CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 11-SEP-7 
14884 
14885 
14886 
14887 
14888 
14889 
14890 
14891 
14892 
14893 
14894 
14895 055506 
14896 055506 012700 
14897 055512 000004 
14898 055514 012737 
14899 055522 012737 
14900 055530 012706 
14901 055534 012737 
14902 055542 012737 
14903 055550 012701 
14904 055554 005000 
14905 055556 076600 
14906 5560 000041 
14907 055562 104012 
14908 055564 000404 
14909 055566 005700 
14910 055570 001401 
14911 055572 104013 
14912 
14913 055574 022626 
14914 055576 012737 
14915 055604 012737 
14916 
14917 055612 005057 
14918 055616 076600 
14919 055620 000041 
14920 055622 103403 
14921 055624 102402 
14922 055626 100401 
14925 055630 001001 
14924 0556352 104014 
14925 
14926 
14927 
14928 
14929 
14930 
14931 
14932 
14933 
14934 
14935 
14936 
14937 


14939 


000752 


177777 


061220 
061122 


177776 


055634 
055634 012700 000753 


177770 
177776 


000004 
000010 


000004 
000010 
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USER CONTROLLED BREAKPOINT == BITIS SEQ 0276 
3f © e 
3f eeeeerrerererererererererrererererreeerereeerereeererere 
-* 
pteereereerererrtererrerereererrererrerererrerenrereereneerentere 
TaTEST 753 CHECK MED IS ILLEGAL IN USER = EXECUTES IN KERNAL 
ie THE NEXT TEST BELOW CHECKS TO SEE THAT THE ‘MED" 
3@ (MAINTENANCE, EXAM, AND DEPOSIT) INSTRUCTION WILL EXECUTE 
“hed WHEN IN KERNEL MODE WITHOUT AFFECTING THE PSW AND 
3* THAT IT IS ILLEGAL IN USER MODE 
pp ererererererereererererereererererererereeeerererererererereret 
TS1753: 
MOV #752,R0 ;;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
SCOPE ;CALL THE SCOPE LOOP UTILITY 


MEDI: MOV #304 ,Q#UBREAK ;SET SCOPE SYNC FOR MED INSTR 
MOV #140000,a#PSw ;GO TO USER MODE 
MOV STACK ,SP ;SETUP USER STACK PTR. 
MOV #2%,Q#ERRVEC SET ERROR TRAP VECTOR TO 2$ BELOW 
MOV #2% ,QMRESVEC ;LOAD RESERVED INST. TRAP VECTOR 


MOV #-1,R1 ;LOAD R1 WITH A =1 
CLR RO CLEAR RO 
MED TRY TO DO MAINT. EXAMINE 
-WORD 041 ;MED READ CODE FOR RI 
pe . ERROR - MED INST. NOT ILLEGAL IN USER 
4 
2s: TST RO 31S RO UNCHANGED? 
BEQ 3$ ;BRANCH IF YES 
ERROR 13 ERROR = MED INSTRUCTION WAS EXECUTED 
;BEFORE TRAPPING 
3$: CMP (SP)+,(SP)¢ CLEAN UP STACK 
4$: MOV WBERR,QMERRVEC RESTORE ERROR TRAP VECTOR 


MOV WRSERR ,QMRESVEC ;RESTORE RESERVED INST. TRAP VECTOR 


MEDO: CLR aaPsw ;GO TO KERNEL MODE,CLEAR COND. CODES 
MED D0 MAINT. EXAMINE OF R1 
~-WORD 041 ;MED READ CODE FOR RI 


BNE 
MEDHLT: ERROR 14 


ppeeeeeeereereererererereeereereererereereneeeerAerereenereeeeAes 
:*TEST 754 MED TEST - R/W DATA PATTERNS TO REGS 

;e THIS PARTICULAR MED TEST WRITES DATA PATTERNS 

;* TO THOSE INTERNAL REGS. WHICH CAN BE WRITTEN 

;* AND READ WITHOUT SPECIAL CONSIDERAIONS. REGISTERS 
;* REQUIRING SPECIAL TESTS ARE TESTED IN LATER 

;@ MED TESTS. 

;* TABLE 11 CONTAINS THE REGISTER ADDRESSES. 

* 

-* 

-* 

§ 


ERROR CC-BITS IN PSwW AFFECTED BY MED 


A MAX. OF 5 ERRORS ARF REPORTED FOR EACH LOC. 


*@eerereeererereeretereererettereettetteeeteteteteeeeeetenereeene 


1754: 
MOV #753,R0 ;;SETUP MISSED TEST &@ FULL WRD TEST # PRIOR TO SCOPE 


i 


CQKDA-D + fa wr BS he 


CQKDA 


AD.P11 


056014 


SEP-7 


5 eee» pA 
Oe ed et et et 


013701 


a 
we 
we 


001102 


001104 
001076 


001102 
055736 
0000035 


001106 
001102 
001100 


177776 
001102 


001104 


001100 
001106 


MACY11 30A(1052) 
1754 


MEDTI: 


1$: 


108: 


14$: 
3$: 


F 
11-SEP-79 13: 


753 PAGE 278 


MED TEST = R/W DATA PATTERNS TO REGS 


#340,a8 ans 
ries2se, avsTmp2 
(R1),awils 
(RI)4, aris 
(R1),a#108 
(R1)+,anl2$ 
aaSTMPS 


0 

RO, aaSTMPO 
R1,aaSTMP) 
avSTMP2,RO 


0 
RO 


0 
RO, aeSTMP3 
avSTMPO,RO 


0 
ns 


3 
a#i2$,aaeSTMP 
#3, aeSTMP4 
14% 

22 

aaSTMPS 
aaSTMP2 
avSTMP1 RI 


;CALL_ THE SCOPE rT UTILITY 
TKERNEL MODE-PRIORITY 7 
sINITIALIZE ADDRESS POINTER 


;PUT WRITE CODE BY “WRITE-MED'S” 
AND POINT R1 TO READ CODE 

[PUT READ CODE BY "READ-MED'S"’ 
:R1 NOW POINTS TO NEXT REG. 


ZCLEAR ERROR COUNTER 
;MED-READ THE INTERNAL REG. 
;MED-READ CO 


E 
;SAVE ITS ORIGINAL CONTENTS 
:SAVE ADDR. PTR. VALUE 
[LOAD RO WITH DATA TO BE WRITTEN 
[MED-WRITE THE TEST DATA 


SMED-WRITE CODE 
;CLEAR RO 
;MED-READ THE DATA BACK 
sMED-READ CODE 
SAVE DATA READ FOR COMPARISON 
;LOAD ORIGINAL DATA IN RO 
;MED-WRITE ORG. DATA TO REG. 
;MED-WRITE CODE 

;D1D DATA READ=DATA WRITTEN? 
;BRANCH IF YES 
;SAVE MED-CODE FOR ERROR 
MAX. ERROR REPORTS YET? 
;BRANCH IF YES 
7 INT. REG. READ BACK WRONG DATA 
7 INCREMENT ERROR COUNTER 
CHANGE DATA PATTERN 

;RESTORE ADDR. POINTER 


SEQ 0277 


G 
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15027 7° IN THE C SCRATCH PAD. THE CONSTANTS ARE READ 





CQKDAD.P11 =: 11-SEP-79 13:31 1754 D TEST = R/W DATA pATizins TO REGS SEQ 0278 
14972 056020 022737 125252 001102 CMP #125252,a#$TMP2 ;BOTH DATA PATTERNS BEEN USED? 
14973 056026 001327 BNE 0-28 TBRANCH IF NO 
14974 056030 005711 TST (R1) SEND OF ADDR. TABLE? 
14975 056032 001310 BNE i$ [BRANCH IF NO 
14977 ppeeeeeeeeeereereerereeererereeeeeeeeereerrieeeeeeereeeRereRerere 
14978 SeTEST 755 MED TEST = VERIFY NOPS; READ R7 INA & B SP 
—" 
14980 ie THIS TEST CHECKS ALL OF THE "'NOP’' OPERATION CODES 
14981 ie TO ENSURE THEY WILL EXECUTE AS NOP'S AND 
14982 ie NOT RESULT IN A PROCESSOR HANG. THE "'NOPS'’ 
14983 te TABLE (TABLE 111) HOLDS THESE CODES. 
14984 ie THIS TEST ALSO READS THE PROGRAM COUNTER (R7) VALUES 
14985 ie STORED IN A & B SCRATCH PADS TO SEE THAT THEY 
14986 ie READ PROPERLY. THE R7 ADDRESSES ARE IN TABLE Iv. 
4 3* 
14988 ppeeeeecererererereeerereeeeeereerererrenenerereereerererereeeees 
14989 056034 151755: 
14990 056034 012700 000754 MOV #754,R0 s;SETUP MISSED TEST &@ FULL WRD TEST # PRIOR TO SCOPE 
14991 056040 000004 SCOPE “CALL THE SCOPE LOOP UTILITY 
14992 056062 012701 064404 MEDT3: MOV #TBL3,R1 ‘INITIALIZE NOP TABLE PTR. (R1) 
14993 056046 112137 056056 1$: MOVB  (R1) +. a#108 “PLACE FIRST "'NOP=CODE'’ AFTER MED 
14994 ‘AND POINT R1 70 LAST CODE IN GROUP 
14995 056052 076600 58: MED [EXECUTE MED WITH NOP OP-CODE 
14996 056054 000000 10$:  .wORD 0 
14997 056056 123711 056054 CMPB aw 108, (R1) :HAVE ALL NOPS IN THAT GROUP 
14998 “BEEN TESTED? 
14999 056062 103003 BHIS 68 “BRANCH IF YES 
15000 056064 005237 056054 INC avl0$ ‘NEXT NOP IN GROUP 
15001 056070 000770 BR 5$ 
15002 056072 105721 6$: TSTB (RTD 4 :POINT R1 TO NEXT NOP GROUP 
15003 056074 005711 1ST (R1) [HAVE ALL GROUPS BEEN TESTED 
15004 056076 001363 BNE 1$ ‘BRANCH IF NO 
15006 056100 113737 064425 056112 MEDT4: MOVB a@#R7A+1,a#5$  ;LOAD R7A READ CODE AFTER MED 
15007 056106 005000 4$: CLR RO [CLEAR RO 
15008 056110 076600 MED "MED READ R7 IN THE ASP 
15009 056112 000000 5$: “WORD 0 [READ CODE FOR R7A 
15010 056114 020027 056114 CMP RO, #5$+2 ‘DID R7A READ CORRECTLY? 
15011 056120 001411 BEU 6$ “BRANCH IF YES 
15012 056122 013737 056112 001100 MOV av5$,aaSTMP1 = SAVE MED-CODE FOR ERROR 
15018 056130 012737 056114 001102 MOV #5$+2,asSTMP2 =: SAVE DATA EXPECTED 
15014 056136 010037 001104 MOV RO, aeSTMP3 “SAVE DATA RECEIVED 
15015 056142 104022 ERROR 22 “R7A DID NOT READ THE RIGHT VALUE | 
15016 056144 023727 056112 000047 68: CMP an5$, #47 “HAS R7B BEEN CHECKED? 
15017 056152 001404 BEQ 8$ ‘BRANCH IF YES 
15018 056154 113737 064431 056112 MOVB  a@#R7B+1,a#5$  :LOAD R7B READ COVE AFTER MED 
15019 056162 000751 BR 4$ “TEST R7 BSP 
15020 056164 8$: 
15021 | 
15022 | 
15023 ss eeeesceserercererceccesenesererereneeseseereneseeaneeenesesennes i 
15024 TEST 756 MED TEST = CSP CONSTANTS CHECK | 
15025 ie 
15026 te THIS TEST CHECKS THE CONSTANT VALUES LOCATED 








H 6 
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CQKDAD.P11 =SEP-79 13:31 1756 MED - TEST = CSP CONSTANTS CHECK SEQ 0279 
15028 :* WITH A MED INSTRUCTION AND COMPARED TO THEIR 
15029 ;* EXPECTED VALUE. THE ADDRESSES OF THESE CONSTANTS 
13030 ie AND THE VALUES EXPECTED ARE IN TABLE VII. 
e 
15032 +: @eeeereercererecereecereeeeeereeeeereeeeeneresereeeeeerererters 
15033 056164 181756: 
15034 056164 012700 000755 MOV #755,R0 ;;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
et 056170 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
15037 056172 076600 MED 
15038 056174 000144 RDFLAG 
15039 056176 052700 004000 BIS #B11T11,R0 7SET THE “CSP INVALID BIT’’ IN FLAG REG. 
15040 056202 076600 MED 
15041 056204 000344 WRFLAG 
15042 056206 170000 MEDTIO: CFCC sEXECUTE FLT. PT INST. SO FLT. PT. 
15043 ;CONSTANTS ARE LOADED INTO CSP 
15044 056210 012701 064536 MOV #TBL7,R1 ;SETUP TABLE POINTER 
15045 056214 012167 000006 108: MOV (R1)+,1% ;LOAD MED READ CODE AT 1% 
15046 056220 001414 BEQ 11% ;BR IF END OF TABLE 
15047 056222 005000 CLR RO 
15048 056224 076600 MED ;READ INTERNAL CONTENTS INTO RO 
15049 056226 000000 1$: -wORD 0 
15050 056230 020021 CMP RO,(R1)+¢ sWAS THE CONSTANT READ THE ONE EXPECTED 
15051 056232 001770 BEQ 10$ ;BRANCH IF YES 
15052 056234 013737 056226 001100 MOV af1$,aaSTMPl ;SAVE MEDCODE FOR ERROR 
15053 056242 0161%7 177776 001102 MOV -2(R1),a#S$TMP2 ;SAVE CONSTANT VALUE EXPECTED 
15054 056250 104021 ERROR 21 ;CSP LOCATION HELD WRONG VALUE 
15055 056252 11$: 
15056 
15057 
15058 peeeeeerrererrreeerrrrerereererereeeteeeReeReneneKerereeeeeteeTs 
9 444 SSTEST 757 MED TEST - MICROBK CHECK OF MICRO-POINTS 
** 
15061 ie THIS TEST USES THE MICROBREAK REGISTER AND THE 
15062 i* INFORMATION IN TABLE V TO CHECK THAT THE 
15063 3¢ CORRECT MED-FLOW 1S ENTERED WHEN EACH 
15064 hd REGISTER IS ACCESSED BY A MED INSTRUCTION. 
15065 78 THE MICROBREAK REG. 1S SETUP TO CAUSE A TRAP TO 
15066 toa LOC. 4 WHEN ITS CONTENTS EQUAL THE ADDRESS 
Feoe4 7@ OF THE MIRCOWORD BEING EXECUTED. 
** 
15069 ie NOTE: THE MICRO BREAK - TRAP-T0-4 CAPABILITY WW 
15070 ;* 1S TRIED AT THE BEGINNING OF THE TEST. 
15071 ;* IF 1T DOESN'T WORK, AN ERROR 1S PRINTED 
F944 38 AND THE TEST IS SKIPPED 
© 
15074 i eeeneetereceeeeerereeeeereerereeerecerereereereerereeeereterers 
15075 056252 TS1T757: 
15076 056252 012700 000756 MOV #756,R0 7:SETUP MISSED TEST & FULL WRD TEST # PRIOR T0 SCOPE 
15077 056256 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
15078 056260 012737 000071 177770 MEDT11: MOV #SWBO1,@#UBREAK ;LOAD MICROBK. REG. WITH AN MiCRO ADDR. 
15079 056266 012737 061104 000004 MOV #BKROUT ,a#4 ;LOAD ADDR. OF MICROBK. ROUTINE IN 4 
15080 056274 012737 000340 000006 MOV #340,a%6 ;LOAD KERNEL PSwW - PRIORITY 7 IN 6 
15081 056302 005037 061112 CLR OFBKFLAG :CLEAR MICROBK. TRAP FLAG 
15082 056306 076600 MED :GET WHAM] INTO RO 


15083 056310 000022 RDWHAM] 
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15084 056312 052700 001000 BIS #B1T9,R0 7SET BIT 9 

15085 056316 076600 MED sMED-WRITE THE WHAM] REG TO 

15086 056320 000222 10$: WRWHAMI sENABLE MICROBK-TRAP-T0-4 

15087 056322 076600 MED 3GET FLAG REGISTER 

15088 056324 000144 RDFLAG 

15089 056326 052700 100000 BIS #B11T15,R0 :SET BIT 15 IN RO 

15090 056332 076600 MED sMED-WRITE THE FLAG REG TO 

18091 056334 000344 11$: WRFLAG sENABLE MICROBK TRAPPING 

158092 056336 000300 SWAB RO sMICROBK TRAP SHOULD OCCUR ON SWAB 
15093 056340 005737 061112 TST @#BKFLAG sD1D0 TRAP TO 4 OCCUR? 

18094 056344 001007 BNE 1$ ;BRANCH IF YES 

15095 056346 005037 001076 CLR aeSTMPO 

15096 056352 016737 121513 001100 MOV SWBO1,a#STMP1 ;SAVE EXPECTED UBREAK ADDR 

15097 056360 104015 ERROR 15 sMICROBREAK TRAP DIDN'T WORK 

+ 444 056362 000453 BR 50$ ;SKIP TO END OF TEST 

15100 056364 012701 000710 1$: MOV #SwBO1*10,R1 7GET CORRECT U-ADDR 

15101 056370 076600 MED ;GET LOG CUA REG 

15102 056372 000103 RDLCUA 

15103 056374 042700 100007 BIC #100007,R0 :GET RID OF IRRELEVANT BITS 

15104 056400 020001 CMP RO,R1 sWAS CORRECT UAPDR LOGGED? 

15105 056402 001401 BEQ 3$ BR IF YES 

15106 056404 104025 ERROR 25 :CUA CONTAINS INCORRECT U-ADDR 
15107 056406 012701 064436 3$: MOV #TBL5,R1 sINTIALIZE TABLE PTR. (R1) 
15108 056412 012702 064464 MOV #TBL6,R2 

15109 056416 010737 001010 MOV PC, ,a#SLPERR :SET ERROR LOOP RETURN TO 2$ 
15110 056422 111137 056460 28: MOVB (R1),a#12$ sLOAD WRITE CODE AFTER MED 

15111 056426 001431 BEO 50$ ;BR IF END OF TABLE 

15112 056430 011237 177770 4$: MOV (R2),@#UBREAK  ;LOAD MICROBK REG. WITH MICROADDR. 
15113 056434 005037 061112 CLR a*BKFLAG :CLEAR MICROBK TRAP-T0-4 FLAG 
15114 056440 076600 MED ;GET FLAG REGISTER 

15115 056442 000144 RDFLAG 

15116 056444 052700 100000 BIS #B1T15,R0 :SET BIT 15 IN RO 

15117 056450 076600 MED :MED WRITE TO FLAG REG TO 

15118 056452 000344 15$: WRFLAG sENABLE MICROBK TRAPPING 

15119 056454 005000 CLR RO : IN CASE U-BREAK TRAP DOESN'T OCCOR 
15120 sUSUALLY BETTER TO WRITE O'S 
15121 056456 076600 MED 

15122 056460 000000 128: «WORD O 

15123 056462 005737 061112 TST Q#BKFLAG :DID WE TRAP-T0-4? (FLAG NOT = 0) 
15124 056466 001006 BNE 20¢ sBRANCH IF YES TO NEXT ENTRY 
15125 056470 013737 056460 001076 MOV a#12$,ae$TMPO ;SAVE MED-CODE FOR ERROR 

15126 056476 011237 001100 MOV (R2) ,aaSTMP1 sSAVE EXPECTED U-ADDR FOR ERROR 
ates 056502 104015 ERROR 15 :MICROBK. TRAP-T0-4 DID NOT OCCUR 
15129 056504 105721 208: TSTB (R1)¢ s INCREMENT TO NEXT TABLE 

15130 056506 005722 TST (R2)+ sENTRIES AND 

$d 056510 000744 RR 23 : CONTINUE 

15133 056512 076600 50$: MED GET WHAM] INTO RO 

15134 056514 000022 ROWHAM| 

15135 056516 042700 001000 BIC #B1T9,RO ; CLEAR BIT 9 

15136 056522 076600 MED sCLEAR THE FLAG REG. TO 

15137 056524 000344 13$: WRFLAG : DISABLE MICROBK. TRAPPING 
15138 056526 076600 MED sCLEAR THE WHAM] REG. TO 

15139 056530 000222 148: WRWHAM| : DISABLE MICROBK. TRAP-T0-4 


CQKDA-D KD11-K 


CQKDAD.P11 


—— 
ar a 
ws 


SAAOCAAMMMNMNFNANVNIYVG LS 


= 
SSVSSRANANSSSLSSFSRA—SSSVSVFIUNLSSSE 
oS 
3 
— 
o 


0000 ONIN NNN NNSIO OO 


a ee ee ee ee ee _ Le 
wn—o 


re eda eal al al al al ah sh ah sb ah sh dh Ah dh ah ah ah ah th db i dh ah hh dh Ah ah ah Ah ah bh ah Ah dh ah ah ah ah Ah ak ah ah ah ak ak ah hl 
ee ee ee le el ec ee el ee a ee ee ce ee et ce a ce ll cl cl el el ee el el 


056532 
056540 
056546 


056554 


056646 
056650 


056652 
056656 
056660 


056662 


SRINLESESESE 
So 
w 
eo 
eo 
“ 
o 


056714 


032701 
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2 
005705 
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000340 
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177766 
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100004 


177774 
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ACY11 3 
1757 


p_reteeerererrereertereererererereeererereeereKereeKereerereneeees 


23: 


3$: 


4$: 


5$: 


ME 
MOV 


MOV 
MOV 


60 


<17:00> ARE LOGGED UPON ERROR. 
FORCING AN ODD ADDRESS TRAP. 
1S "LOG FIRST’. 


#MEDT11 ,A#SLPERR 


#BERR 284 


#304, a#UBREAK 


J 6 
OA(1052) 11-SEP-79 15:53 PAGE 282 
D TEST = MICROBK CHECK JF MICRO-POINTS 


;RESET LOOP ON ERROR POINTER 


sRESTORE NORMAL ERROR ROUTINE 


GENERATE SYNC PULSE ON MED INSTR 


PHYSICAL ADDRESS & ODD ADDRESS ERROR LOGGING 
THIS TEST CHECKS THAT THE PROPER PHYSICAL ADDRESS BITS 


THE ERROR | 
THE ERROR LOG 


S CAUSED BY 
MODE USED 


ALSO, THE ODD ADDRESS ERROR BITS IN 


THE LOG JAM AND CPU ERROR REGISTER ARE CHECKED. 


MOV #757,R0 
SCOPE 

MOV #2$,084 
MOV #340 ,a%6 
MOV #B1115+*B1T0,R0 
MED 

WRWHAM] 

MOV #1$+1,R2 
TST 1$+1 

ERROR 23 

BR 10$ 

CMP (SP)+,(SP)+ 
MOV #BERR a4 
MED 

ROLJAM 

MOV a#CPUERR,R1 
BIT #B1T6,R1 
BNE 3$ 

ERROR 24 

BIT #B1T15+B1T2,R0 
BNE 4% 

ERROR 24 

CLR R5 

MED 

RDLPBA 

MOV RO,R5 

CMP RO,R2 

BEQ 5$ 

INC R5 

MED 

ROLSERVICE 

SWAB RO 

BIC #177774,R0 
BNE 11$ 

TST R5 


SEQ 0281 


7;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
;CALL THE SCOPE LOOP UTILITY 
;SETUP PC FOR ODD ADDR SERVICE 


;SETUP "LOG FIRST’ MODE 


SAVE ADDRESS OF ODD ADDR. INSTRUCTION 
3D0 ODD ADDRESS INSTRUCTION TO FORCE 


4 
DID NOT OCCUR 


7A JAMUPP & TRAP TO 
;t** ODD ADDR. TRAP 
sEXIT TEST 

RESTORE STACK 
;RESTORE OLD PC & P 


;WAS ODD ADDR. ERROR RECORDED BY 


; THE CPU ERROR REG] 
BRANCH IF YES 

;*** CPU ERROR REG. 
REPORT ODD ADDRESS 
READ THE LOG JAM R 


WAS ODD ADDR. ERROR LOGGED BY LOG JAM 


;BRANCH IF YES 
st** LOG JAM REG. 
;0DD ADDRESS ERROR 


;CLR ERROR FLAG 
READ THE LOG PBA R 


sSAVE RECEIVED PHYS ADDR <15:0> 
WERE BITS <15:00> OF THE PHYSICAL 


;BUS ADDR. LOGGED C 
BRANCH IF YES 

;SET ERROR FLAG 
;READ THE LOG SERVI 


sy] 


STER? 


DID NOT 
ERROR 
EGISTER 


DID NOT LOG 
CORRECTLY 


EGISTER 


ORRECTLY? 


CE REGISTER 


7GET ‘PBA 17816'" DOWN TO BIT POSITION 081 


BR IF PHYS ADDR BITS <17:16> LOGGED CORRECTLY 


;PREVIOUS ERROR? 
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DAD. 
15196 056716 001402 BEQ 10$ ;BR_ IF NOT 
15197 056720 005001 118: CLR R1 ;SET UP EXPECTED PA<17:16> 
15198 056722 104026 ERROR 26 st PHYSICAL BUS ADDR. <17:00> 
15199 NOT LOGGED CORRECTLY WHEN 
15200 : 000 ADDRESS TRAP OCCURRED 
15201 056724 005000 10$: CLR RO 
15202 056726 076600 MED ;DISABLE "LOG FIRST*’ MODE 
15203 056730 000222 WRWHAM] 
15204 
15205 
15206 p_eeeeeeneereeeeererererereerenereeererreeneeerereeeeeeterereeene 
15207 s*TEST 761 CHECK DISABLE PARITY ERROR TRAP 
15208 s*THIS TEST CHECKS THAT PARITY ERROR TRAPS TO LOCATION 114 
15209 > tARE + ge a BI10 OF THE CACHE CONTROL REGISTER IS 
15210 *SET ( =1). A TRAP TO 114 SHOULD NOT OCCUR AND ERROR 
15211 :* INFORMATION SHOULD NOT BE LOGGED IN THE LOG PBA, LOG 
15212 ;*CACHE DATA, OR LOG TAG DATA REGISTERS. WRONG PARITY 1S 
15213 *WRITTEN INTO A TEST LOCATION TO CAUSE THE PARITY ERROR 
15214 > *NEEDED IN THIS TEST. 
19215 ppeeeeeeeeerererereereeeeerereeereereeeeeeeeKeeNeeeKeeeereeeeeee 
15216 056732 TST761: 
15217 056732 012700 000760 MOV #760,R0 ;;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
He 3 056736 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
15220 056740 012701 064046 MOV #TLOC1,R1 ;GET POINTER TO TEST LOCATION 
15221 056744 005711 TST (R1) MAKE IT A HIT 
15222 056746 012737 000100 177746 MOV #WWP ,aa#CCR SET WRITE WRONG PARITY BIT 
15223 056754 012711 125252 MOV #125252,(R1) ;WRITE TO TEST LOC. WITH WRONG PARITY 
135s¢ 056760 012737 000001 177746 MOV #DPTRP,a#CCR ae tikes wae ERROR TRAPS 

ND CL 

15226 056766 012737 057026 000114 MOV #1$,0#114 ;SETUP PARITY ERROR VECTOR 
15227 056774 012737 000340 000116 MOV #340,a#116 
15228 057002 005000 CLR RO 
15229 057004 076600 MED ;CLEAR LOG PBA REGISTER 
15230 057006 000302 WRLPBA 
15231 057010 076600 MED CLEAR LOG CACHE DATA REGISTER 
15232 057012 000300 WRLDATA 
15233 057014 076600 MED ;CLEAR LOG CACHE TAG REGISTER 
15234 057016 000307 WRLTAG 
15235 057020 005767 005022 TST TLOC1 READ TEST LOCO TO FORCE PARITY ERROR 
15236 057024 000406 BR 2$ ;BRANCH IF NO TRAP OCCURS 
15237 057026 012700 000200 1$: MOV #200,R0 
15238 057032 076600 MED ;CLEAN UP THE CACHE 
15239 057034 000352 352 ; INITIALIZATION CODE 
15240 057036 022626 CMP (SP)+,(SP)+ ;CLEAN UP STACK 
15241 057040 104030 ERROR 530 ;tt* PARITY TRAP TO 114 OCCURRED 
15242 ;WHEN IT SHOULD HAVE BEEN DISABLED 
15243 057042 012700 000200 2$: MOV #200,R0 
15244 057046 076600 MED ;CLEAN UP THE CACHE 
15245 057050 000352 352 : INITIALIZATION CODE 
15246 057052 012711 125252 MOV #125252,(R1) WRITE BAK GOOD PARITY IN TST LOC 
15247 057056 012737 000116 000114 MOV #116,a#114 ;RESTORE ORIGINAL PARITY HANDLER & PSW 
15248 057064 005037 000116 CLR a#il6 
15249 057070 005005 CLR R5 ;CLEAR ERROR FLAG 
15250 057072 076600 MED ;READ LOG PBA REGISTER 
15251 057074 000102 RDLPBA 
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18252 057076 010003 MOV RO,R3 SAVE C 
15253 LOG PBA. REG. STILL CLEAR? 
15254 057100 001401 BEQ 3$ ;BRANCH IF YES 
18255 057102 005205 INC R5 sOTHERWISE SET ERROR FLAG 
15256 057104 076600 3$: MED TREAD LOG CACHE DATA REG. 
15257 057106 000106 RDLDATA 
158258 057110 010001 MOV R0,R1 ;SAVE COPY 
15259 ;LO0G CACHE DATA REG. STILL “LEAR? 
18260 057112 001401 BEQ 4$ ;BRANCH IF YES 
158261 057114 005205 INC RS sOTHERWISE SET ERROR FLAG 
15262 057116 076600 4$: MED ;READ LOG CACHE TAG REG. 
15263 057120 000107 RDLTAG 
15264 057122 010002 MOV RO,R2 3s SAVE COPY 
15265 ;LOG CACHE TAG REG. STILL CLEAR? 
15266 057124 001401 BEQ 5$ ;BRANCH IF YES 
158267 057126 005205 INC R5 sOTHERWISE SET ERROR FLAG 
15268 057130 005705 5$: TST R5 ;WERFE ANY OF -06 REGISTERS CHANGED 
15269 057132 001401 BEQ 6$ sBRANCH IF ine 
18270 057134 104027 ERROR 27 3*e* ONE OF LOG REGISTERS CHANGED 
15271 ‘WHEN ERROR SHOULD NOT HAVE BEEN LOGGED 
15272 ;LOG PBA, LOG DATA & LOG TAG 
15273 REGISTER SHOULD BE CLEAR. 
Fs 3 057136 005037 177746 6$: CLR aavccR ENABLE PARITY ERROR TRAPS 
15276 speeeeeeeereteereteeeeteetereeeeeeeeereeKeeKKeTeKeKeKeeeeeeeeees 
4 444 s*TEST 762 CHECK PARITY ERROR BITS IN MEMERR REG. IN BACKUP MODE OF CACHE (TRAP) 
15279 z*THIS TEST CHECKS THAT ALL OF THE PARITY ERROR BITS (5,6,7) 
15280 :*OF THE MEMORY ERROR REGISTER ARE SET TO ‘'l'' WHEN A CACHE 
15281 ;*PARITY ERROR OCCURS IN THE BACKUP MODE. 
15282  eeeeeecrteerererteeerreetreeeeeerteeretentenenererereeeeeeeters 
15283 057142 TST762: 
15284 057142 012700 000761 MOV #761,R0 7:SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
15285 057146 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
15286 057150 012701 064046 MOV #TLOC1,R1 ;GET POINTER TO TEST LOCATION 
15287 057154 005711 TST (R1) sMAKE IT A HIT 


5 

) 

12737 000100 177746 MOV #WWP,aaCCR SET WRITE WRONG PARITY BIT 
5 12711 125252 MOV #125252,(R1) sWRITE TO TEST LOC. WITH WRONG PARITY 
5 042737 000100 177746 BIC #WWP,aaCCR CLEAR WwWP 

5 12737 057232 000114 MOV #1$,a#114 ;SETUP NEW TEST HANDLER AT PARITY VECTOR 
5 12737 000340 000116 MOV #340 ,a#116 

5293 057212 005737 064046 TST a#TLoci ;READ TEST LOC. TO FORCE PARITY ERROR 
5294 057216 012700 000200 MOV #200,R0 

5295 057222 076600 MED ;CLEAN UP THE CACHE 

5296 057224 000352 352 s INITIALIZATION CODE 
5297 057226 104031 ERROR 31 :#t* PARITY ERROR DID NOT CAUSE TRAP 
5298 057230 000405 BR 2$ ;BRANCH TO 2$ 

5299 057232 012700 000200 1$: MOV #200,R9 

5 CLEAN UP THE CACHE 

5 
5 
5 
5 
5 
5 
5 


057240 000352 352 4 ng Boge the CODE 

057242 022626 CMP (SP)+,(SP)+ :CLEAN UP STACK 

057244 022737 000340 177744 2%: CMP #000340, ,a#MEMERR ;WERE PARITY ERROR BITS (5,6,7) SET 
;AND CPU ABORT BIT (15) LEFT CLEAR 
:IN MEMORY ERROR REGISTER? 

1403 BEQ 3$ ;BRANCH IF YES 

3700 177744 MOV a#MEMERR,RO 


So 
w 
~“ 
~ 
w 
o 
o 
~“ 
o 
oe 
So 
So 
=z 
m 
i] 


oooo 
Www — 


306 057252 00 
307 057254 01 
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15308 057260 104032 ERROR 32 z:tee MEMORY ERROR REGISTER BITS 

15309 sWERE SET INCORRECTLY 

15310 057262 012737 000116 000114 3$: MOV #116,a0114 sRESTORE OLD PARITY HANDLER PC & PSW 
123i) 057270 005037 000116 CLR avil6 

19313 ppeeeeereerereeeeeeeeeeeererererrerereereeeeeeeeeeeetereeeeTeTeee 

FE 34 s*TEST 763 CHECK UNIBUS TIMEOUT, ODD ADDRESS AND LOG CONTINUOUS MODE 
15316 s*THIS TEST CHECKS THAT THE “UNIBUS TIMEOUT’’ BIT (B1T4) 

15317 s*GETS SET IN THE CPU ERROR REGISTER WHEN A TIMEOUT OCCURS. 
15318 - 7*A TIMEOUT TRAP IS FORCED BY REFERENCING BUS ADDRESS 760000. 
15319 >*THEN AN ODD ADDRESS ERROR IS FORCED AND IT 

15320 3*1S CHECKED IF ONLY BIT (6)-ODD ADDRESS ERROR IS SET 

15321 s*(IN CPUERR). THIS CHECKS THAT THE ERROR LOG IS 

15322 > *CONTINUOSLY UPDATED IN THE ‘LOG CONTINUOUS" MODE. 

19323 pptreecerereerereeeerererererreterererrereeeneeereteeeeReeeeeees 
15324 057274 TST763: 

15325 057274 012700 000762 MOV #762,R0 7;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
15326 057300 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

15327 057302 012737 057324 000004 MOV #1$,a84 sSETUP NEW PC & PSW FOR THE 

15328 057310 012737 000340 000006 MOV #340 ,a%6 s TIMEOUT SERVICE ROUTINE 

15329 057316 005737 160000 TST a#160000 sFORCE A TIMEOUT TRAP TO 4 BY 

15330 ;REFERENCING NON-EXISTENT ADDRESS 
15331 057322 000461 BR 6$ 

15332 057324 022626 1$: CMP (SP)+,(SP)+ sRESTORE STACK 

15333 057326 012737 061220 000004 MOV #BERR,a84 sRESTORE OLD PC & PSw FOR TIMEOUT 
15334 057334 076600 MED 

15335 057336 000100 RDLJAM 

15336 057340 013701 177766 MOV a#CPUERR,R1 ;SAVE CPU ERR REG 

15337 057344 022701 000020 CMP #B1T4,Ri :D1D ‘‘UNIBUS TIMEOUT’ BIT IN CPU ERROR 
15338 ;REGISTER GET SET? 

15339 057350 001401 BEQ 2$ BRANCH IF YES 

15340 057352 104033 ERROR 33 :*ee "UNIBUS TIMEOUT’ BIT (BIT4) IN CPU 
15341 sERROR REG. DID NOT SET WHEN A 

15342 ; TIMEOUT WAS FORCED 

15343 ;READ THE LOG JAM REGISTER 

15344 057354 022700 021200 2$: CMP #B1T13+B1T9+B1T7,R 5 (REV.DO) 
15345 7D10 “UNIBUS TIMEOUT’’ BIT (BIT7) SET? 
15346 057360 001401 BEQ 3$ ;BRANCH IF YES 

15347 057362 104033 ERROR 33 sete "'UNIBUS TIMEOUT’ BIT (BIT7) 
15348 7D1D NOT SET IN LOG JAM REGISTER 
15349 ;WHEN UNIBUS TIMEOUT WAS FORCED 

15350 057364 076600 3$: MED ;READ LOG PBA 

15351 057366 000102 RDLPBA 

15352 057370 020027 160000 CMP RO,#160000 sWAS PHYS BA LOGGED CORRECTLY? 

15353 057374 001403 BEQ 5$ 

15354 057376 012701 160000 MOV #160000,R1 

15355 057402 104020 ERROR 20 ;PHYSICAL BUS ADDRESS WAS 

15356 ;LOGGED WRONG ON A UNIBUS 

15357 >; TIMEOUT 

15358 057404 012737 057426 000004 5$: MOV #43084 ;SET UP PC,PSwW FOR ODD ADDRESS 

15359 057412 012737 000340 000006 MOV #340,a#6 

15360 057420 005767 177741 TST 3$+1 sFORCE ODD ADDRESS ERROR 

15361 057424 000420 BR 6$ 

15362 057426 022626 4$: CMP (SP)+,(SP)+ sRESTORE STACK 

15363 057430 012737 061220 000004 MOV #BERR,aa4 
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15364 057436 076600 MED 

15365 057440 000100 ROL JAM 

15366 057442 013701 177766 MOV @#CPUERR,R1 

15367 057446 022701 000100 CMP #B116,R1 3000 ADDR. BUT SET 3 

15368 057452 00140 BEQ 7$ 

15369 057454 104024 ERROR 24 3000 ADDRESS BIT WAS 

15370 sNOT SET IN THE CPU 

15371 sERROR REGISTER. IN LOG 

15372 ;CONTINUOUS MADE THE 

15373 sLATEST ERROR SHOULD 

15374 3BE LOGGED 

15375 057456 032706 000004 7$: BIT #B1T2,R0 ;00D ADR. BIT SET IN 

15376 057462 001901 BNE 6$ 3LOG JAM? 

15377 057464 104024 ERROR 24 3000 ADDRESS BIT WAS 

15378 sNOT SET IN THE LOG 

15379 7 JAM REGISTER ON A 

15380 7000 ADDRESS ERROR 

15381 057466 076600 6$: MED ;CHECK IF LAST INTERRUPT VECTOR 
15382 057470 000104 ROLF GINT ;WAS LOGGED? 

15383 057472 120027 000004 CMPB RO,#4 

15384 057476 001401 BEQ 8% 

+ t+ 44 057500 104036 ERROR 36 ;LAST ERROR VECTOPR WS NOT LOGGED 
15387 057502 8$: 

15388 

15389 

15390 pe teweecererererrereerererrerrerereeerenteeeneeeeeenerenerereeee 
1333) s*TEST 764 CHECK ILLEGAL INTERNAL ADDRESS TRAP 

15393 s*THIS TEST CHECKS THAT A TRAP OCCURS UPON REFERENCING AN 
15394 Zt] LLEGAL INTERNAL ADDRESS AND THAT “ILLEGAL INTERNAL ADDRESS" 
15395 :*BI1T (BITO) OF THE CPU ERROR REGISTER AND BITS OF LOG JAM 
15396 s*REGISTER GET SET. 117 ALSO CHECKS IF THE INTERRUPT VECTOR 
15397 7*(4) IS SAVED AS THE "LAST INTERRUPT VECTOR" IN THE LOG 
15398 > *FLAG/INTERRUPT REG. 

15399 p_eeeeeererecereererrereererereeereerereeneneteneteeeeresenenteee 
15400 057502 TS1T764: 

15401 057502 012700 000763 MOV #763,R0 7;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
15402 057506 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

15403 057510 012737 057540 000004 MOV #1$,a84 ;SETUP NEW HANDLER PC & PSW 

15404 057516 012737 000340 000006 MOV #340,a%6 

15405 057524 005037 177746 CLR aaccrR 

15406 057530 012707 177746 MOV #CCR,PC s ILLEGAL INTERNAL ADDRESS TRAP SHOULD GCCUR 
15407 057534 104034 ERROR 34 ;#** JTLLEGAL INTERNAL ADDRESS 

15408 :D1D NOT RESULT IN A TRAP 

15409 057536 000420 BR 3$ ;BRANCH TO EXIT IF NO TRAP 

15410 057540 022626 1$: CMP (SP)+,(SP)¢ sRESTORE STACK 

15411 057542 012737 061220 000004 MOV #BERR ,aa4 sRESTORE OLD HANDLER PC & PSwW 

15412 057550 076600 MED 

15415 057552 000100 RDLJAM 

15414 057554 013701 177766 MOV @#CPUERR,Ri st = 
15415 057560 032701 000001 BIlT #B1T0,R1 :DID "ILLEGAL INTERNAL ADDRESS" BIT (0) 
15416 :IN CPU ERROR REGISTER GET SET? 
15417 057564 001001 BNE 2% sBRANCH IF YES 

15418 057566 104035 ERROR 35 ;*t* JTLLEGAL INTERNAL ADDRESS 

15419 ;B1T DID NOT SET IN CPU ERROR REG, 


Fal LST No 
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15420 sREAD THE LOG JAM REG. 

15421 057570 032700 000040 28: BiT #B115,R0 [DID “ILLEGAL INTERNAL ADDRESS" B;T (5) 
15422 :1N LOG JAM REG. GET SET 

19423 057574 001001 BNE %$ [BRANCH IF YES 

154264 057576 104055 ERROR 35 seee ILLEGAL INTERNAL ADDRESS BIT 

19425 [D1 WOT SET IN LOG JAM REG. 

15426 057600 3$: 

15427 

15428 

15429 peterereeetereererererererrerrerererrerererereererereneererereTe 
15430 tSTEST 765 CHECK LOG SERVICE @ MEMERR LOGS LO-HI BYTE & TAG, IN CACHE ABORT MODE 
15431 TEST CHECKS THAT "LO BYTE PARITY’ “HI BYTE PARITY'’ AND “TAG PARITY" 
15432 [BITS CAN SET IN "LOG SERVICE’ REGISTERS. IT IS ALSO 

15433 :CHECKED THAT THE PROPER TAG AND DATA BITS GET STORED 

15434 sIN THE "LOG CACHE DATA, "LOG CACHE TAG/CPU"’ AND THE 

Fk +4 s RERORT ADDRESS REGISTER WHEN A PARITY ERROR IS 

15437 17 1S CHECKED IF THE INSTRUCTION WAS ABORTED AND THE 

15438 [LOG FLAG/INTERRUPT REGISTER LOGGED THE LAST INTERRUPT 

15439 VECTOR. 

15440 pptrereerereerererereerrerereererrrrrererereereeneeerereeeeeeeees 

15441 057600 TS1765: 

15442 057600 012700 000764 MOV #764,R0 ::SETUP MISSED TEST @ FULL WRD TEST # PRIOR TO SCOPE 
ar 057604 000004 SCOPE :CALL THE SCOPE LOOP UTILITY 

15445 057606 012737 000201 177746 MOV #OPTRP*+PABORT,@#CCR ;DISABLE PARITY TRAPS (CACHE) 
154466 057614 005037 001062 CLR a#$REGO 

15447 057620 012701 064046 ' MOV #TLOC1,R1 :GET POINTER TO TEST LOC. 

15448 057624 005711 TST red. MAKE IT A HIT 

15449 057626 052737 000100 177746 BIS wwP ,aaccR WRITE WRONG PARITY SET 

15450 057634 012711 125252 MOV Fi25382, (R1) sWRITE TEST LOCATION WITH WRONG PARITY 
15451 057640 042737 000100 177746 BIC @uuwP, asccR sCLEAR WwP 

18452 057646 012700 100001 MOV #81T15+B1T0,RO 

15453 057652 076600 MED ENABLE "LOG FIRST'’ MODE, AND 

15454 057654 000222 WRWHAMI ERROR LOGGING 

15455 057656 042737 000001 177746 BIC #OPTRP,a#CCR sENABLE CACHE PARITY TRAPS 

15456 057664 012737 057712 000114 MOV #@PTRP1,a#114 NEW PARITY TRAP SERVICE 

15457 057672 016737 004150 001062 MOV TLOC1,a#$REGO ;READ TEST LOC, FORCE PARITY ERROR 
15458 057700 012700 000200 MOV #200,R0 

15459 057704 076600 MED :CLEAN UP THE CACHE 

15460 057706 000352 352 : INITIALIZATION CODE 

15461 057710 104031 ERROR 31 :ee® CACHE PARITY ERROR TRAP 

15462 :D1D NOT OCCUR WHEN 

15463 :TEST LOC WITH BAD PARITY 

15464 WAS READ 

15465 

15466 sENTER HERE IF PARITY TRAP OCCURRED 
15467 057712 012700 000200 PTRP1: MOV #200,R0 

15468 057716 076600 MED :CLEAN UP THE CACHE 

15469 057720 000352 . 352 INITIALIZATION CODE 

15470 057722 012737 000001 177746 MOV #OPTRP,a#CCR [DISABLE CACHE PARITY ERROR TRAPS 

15471 057730 012737 000116 000114 MOV #116,a#114 REESTABLISH OLD SERVICE VECTORS 

15472 057736 005037 000116 CLR avil6 

15473 057742 022626 CMP (SP)+,(SP)¢ 

15474 057744 005737 001062 TST a#$REGO sWAS THE INSTRUCTION ABORTED ON 


15475 CACHE PARITY ERROR (ABORT MODE)? 
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15476 057750 001401 BEQ 1$ sYES 

15477 057752 104041 ERROR 41 s INSTRUCTION HAVING CACHE PARITY 
15478 SERROR WAS NOT ABORTED, IN THE 
15479 ;CACHE ABORT MODE. 

15480 057754 076600 1$: MED [READ THE "LOG SERVICE’ REGISTER 
15481 057756 000101 RDLSERVICE 

15482 057760 010004 MOV : COPY 

15483 057762 0462704 1774635 BIC eC<LOOWL*TAGOBITI>, R4 ;MASK ALL BUT LO,HI,TAG BITS 
15484 057766 022704 000342 cmp #342,R4 :LO.H] ,TAG, CACHE PARITY BITS SET? IN “SERVICE” 
15485 057772 001401 BEQ 23 7 YES 

15486 057774 104042 ERROR 42 seee "LO BYTE’ PARITY ERROR 

15487 [AND TAG’ PARITY ERROR BITS 

15488 [WERE NOT LOGGED CORRECTLY IN “LOG 
15489 SSERVICE'’ REGISTER, WHEN PARITY 
15490 [ERROR TRAP WAS FORCED. 

15491 sCLEAR BITS ARE ACTIVE. 

15492 057776 013700 177744 28: MOV aeMEMERR,RO [GET MEM ERR REG 

15493 060002 022700 100340 CMP #HI+LO+TAG*B1T15,RO ;DID''LO BYTE’ "HI BYTE’ AND "TAG" 
15494 :PARITY ERROR BITS SET IN 

15495 :THE MEMORY ERROR REGISTER? 

15496 060006 001401 BEQ 3$ YES 

15497 060010 104043 ERROR 43 sete "LO BYTE’ "HI BYTE’ AND "‘TAG’’ PARITY 
15498 sERROR BITS DID NOT SET 

15499 CORRECTLY IN THE MEMORY 

15500 sERROR REGISTER 

15501 060012 076600 3$: MED sREAD "LOG PBA'' REGISTER 

15502 060014 000102 RDLPBA 

15503 060016 020027 064046 CMP RO, #TLOCI :D1D “LOG PBA’' CONTAIN CORRECT 
15504 :PHYSICAL BUS ADDRESS-WHERE 

15505 ;THE PARITY ERROR OCCURRED? 

15506 060022 001403 BEQ 4$ YES 

15507 060024 012701 064046 MOV #TLOC1,R1 EXPECTED PBA 

15508 060030 104020 ERROR 20 :tee PHYSICAL BUS ADDRESS 

15509 (WHERE PARITY ERROR OCCURRED) 
15516 :WAS NOT LOGGED CORRECTLY 

15511 sWHEN CACHE PARITY ERROR WAS FORCED 
15512 060032 076000 4$: MED 

15513 060034 000107 RDLTAG :READ "LOG CACHE TAG'’ REGISTER 
15514 060036 000300 SWAB RO 

15515 060040 012701 064046 MOV #TLOC1,R1 :SHIFT RIGHT (3 TIMES) THE 16 BIT 
15536 060044 000301 SWAB R1 

15517 060046 106201 ASRB R1 sPHYSICAL BUS ADDRESS OF THE 

15518 060050 106201 ASRB R1 :TEST LOCATION 

15519 060052 106201 ASRB R1 

15520 060054 052701 000200 BIS #BIT7.R1 sFUDGE TAGE BIT 

15521 060060 120100 CMPB R1,R0 ;WAS THE CORRECT TAG LOGGED? 

15522 060062 001401 BEQ 5$ YES 

15523 060064 104017 ERROR 17 :TAG BITS WERE NOT LOGGED 

15526 “CORRECTLY, WHEN CACHE 

15525 :PARITY ERROR WAS FORCED 

15526 076600 58: MED sREAD CACHE DATA 

15527 060070 000106 RDLDATA 

15528 060072 020027 125252 CMP RO,#125252 :CACHE DATA LOGGED CORRECTLY? 

15529 060076 001403 BEQ 6$ 

15530 060100 012701 125252 MOV #125252,R1 TEXPECTED DATA 

15531 060104 104016 ERROR 16 
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155 

12084 060106 012700 000001 6$: MOV #B1T0,R0 ;SET UP LOG CONTINUOUS 

15534 060112 076600 MED 

15535 060114 000222 WRWHAMI 

15536 060116 012737 060130 000004 MOV 873,084 sSETUP CPU VECTOR 

15537 060124 005737 160000 TST a4160000 FORCE TIMEOUT & TRAP TO 7$ 

15538 060130 022626 7$: cmp (SP)+,(SP)¢ 

15539 060132 012737 061220 000004 MOV #BERR, 284 RESTORE CPU VECTOR 

15540 060140 076600 MED ;READ LOG FLAG/INTERRUPT REGISTER 
15541 060142 000104 ROLFGINT 

18542 060144 120027 000114 CMPB RO,#114 :D10 LO BYTE CONTAIN VECTOR 114? 
15543 060150 001403 BEQ $ 

15544 060152 010037 001062 MOV RO, a#SREGO 

15545 060156 104036 ERROR 36 sLAST INTERRUPT VECTOR WAS NOT 
1§546 ;LOGGED CORRECTLY IN FLAG REGISTER 
1§547 sWHEN A CACHE PARITY ERROR WAS 
15548 FORCED. 

15549 060160 8$: 

15550 

15551 ppeeeeeeerereererrererrerereeerrrerererererreReHeeNeeAeNReeeeeeeAee 
15552 s*TEST 766 CHECK “LOG FIRST’ MODE OF ERROR LOGGING 

15553 s*THIS TEST CHECKS THE “LOG FIRST’’ MODE OF ERROR LOGGING. 
15554 s*THE “LOG FIRST’ MODE 1S ENABLED. THEN A TIME-OUT TRAP 
15555 s*1S FORCED, BIT 4 OF CPU ERROR REGISTER SHOULD BE SET. 
15556 :*THEN AN ODD ADDRESS TRAP 1S FORCED. HOWEVER, THIS 
15557 s®* TIME THE ERROR SHOULD NOT BE LOGGED; BIT 6 (ODD 

15558 stADDRESS) SHOULD NOT BE SET BECAUSE THE ERROR LOG 

seezp s#1S LOCKED UP AFTER THE FIRST ERROR. 

15561 s*THEN, THE ERROR LOG IS ENABLED (BY SETTING BIT 0 OF 
15562 s*WHAMI). AN ODD ADDRESS ERROR IS FORCED AGAIN AND IT iS 
15563 s*CHECKED THAT THIS TIME THE ERROR IS sts (BIT 6-0DD 
15564 :*ADDRESS SHOULD BE SET IN CPU ERROR REGISTER 

15565 TOR ee wee 2 UR A A cecal db a ne 
15566 060160 181766: 

15567 060160 012700 000765 MOV #765,R0 :;SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 
Y te 060164 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 

6 

15570 060166 012700 100001 MOV #BI1T15+B1T0,RO ;SET UP “LOG FIRST MODE 

15571 060172 076600 | 

15572 060174 000222 WRWHAM] 

15573 060176 012737 060220 000004 MOV #1$,a%4 ;SET UP NEW PC & PSw FOR 

15574 060204 012737 000340 000006 MOV #340,a86 TIMEOUT 

15575 060212 005737 160000 TST a#160000 sFORCE A TIMEOUT 

42378 060216 000462 BR 5$ ;SKIP TEST IF NO TIMEOUT 

15578 060220 022626 1$: CMP (SP)+,(SP)¢ RESTORE STACK 

15579 ;B1T 4 OF CPU ERROR REGISTER 
15580 ;SHOULD HAVE SET 

15581 060222 012737 060236 000004 MOV #2084 :SET UP NEW PC FOR ODD ADDRESS 
15582 060230 005767 177765 TST 1$+1 sFORCE ODD ADDRESS TRAP 

N44 44 060234 000453 BR 5$ sSKIP TEST IF NO ODD ADDRESS TRAP 
1 

15585 060236 022626 23: CMP (SP)+,(SP)+ RESTORE STACK 

15586 060240 012737 061220 000004 MOV #BERR, a4 

15587 060246 076600 MED 
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15588 060250 000100 ROLJAM 

15589 060252 013701 177766 MOV a*CPUERR,RI 

15590 060256 022701 000020 CMP #B1T4,R1 ;“TIMEOUT’’ BIT SHOULD BE STILL 

15591 sSET, CHECK? 

15592 060262 001402 BEQ 3$ 

15593 060264 104035 ERROR 33 ;*ee SECOND ERROR (ODD ADDRESS) 
15594 sUPDATED THE ERROR LOG IN 

15595 ;THE LOG FIRST MODE. BIT 4 

15596 > (UNIBUS TIMEOUT) SHOULD BE 

15597 STILL SET FROM THE FIRST 

15598 sERROR 

15599 060266 000436 BR 5$ sSKIP THE REST 

15600 060270 032700 100004 38: BIT #B112+B1115,RO ;CHECK THAT ODD ADRES ERROR BITS NOT 
15601 060274 001401 BEQ 6$ $4. IN LOG JAM. NOTE LOG FIRST 
15602 MODE SHOULD INHIBIT FURTHER 

15603 TERROR LOGGING 

15604 060276 104037 ERROR 57 ;0DD ADRESS ERROR BITS GOT SET IN LOG JAM 
15605 ;THEY SHOULD NOT BE SINCE LOG FIRST MODE 
15606 ; INHIBITS ERROR LOGGING AFTER THE FIRST ERROR 
15607 060300 012700 100001 6$: MOV #B1T15*BITO,RO ;ENABLE ERROR LOG AGAIN IN 

15608 ;LOG FIRST MODE 

15609 060304 076600 MED 

15610 0603506 000222 WRWHAM |] 

15611 060310 012737 060332 000004 MOV #4$,a84 ;SET UP NEW PC & PSW FOR 

15612 060316 012737 000340 000006 MOV #340,a6 :0DD ADDRESS ERROR 

15613 060324 005767 177741 TST 3$+1 sFORCE ODD ADDRESS TRAP 

15614 0603350 000415 BR 5$ ;SKIP_IF NO TRAP 

15615 060332 022626 4$: CMP (SP)+,(SP)+ sRESTORE STACK 

15616 RESTORE OLD PC(4), PSW(6) 

15617 060334 012737 061220 000004 MOV WBERR aes 

15618 060342 022737 000100 177766 CMP WBIT6,a#CPUERR ;THE ERROR LOG FROM PREVIOUS 

15619 sERROR SHOULD BE OVER WRITTEN. 

15620 ;000 ADDRESS BIT SHOULD 

15621 >BE SET, BECAUSE THE ERROR 

15622 060350 001405 BEQ 5$ ;LOG WAS ENABLED. 

15625 :OK, IF YES 

15624 060352 076600 MED 

15625 060354 000100 RDLJAM 

15626 060356 013701 177766 MOV @#CPUERR,R1 

15627 060362 104040 ERROR 40 ;THE ERROR LOG WAS NOT UPDATED 

15628 ; (UPON AN ODD ADDRESS ERROR) 

15629 sAFTER THE LOG WAS ENABLED. 

15630 ;AT THIS FORMAT BIT 6 OF 

15631 :CPU ERROR REGISTER SHOULD 

15632 ;BE SET. IT WAS NOT. 

15633 060364 012737 06122C 000004 5%: MOV WBERR aa s;RESTORE OLD PC(4), PSW(6) 

15634 060372 012700 000001 MOV #B1T0,R0 

15635 060376 076600 MED ;PUT THE LOGGING BACK INTO 

Fad 3 060400 000222 WRWHAM] ‘CONTINUOUS’ MODE 

Fr 14 ppeeeeeeeeeereeerererereerrererererererererreeeeereReeeeeeee eee 
15659 s*TEST 767 CHECK LAST INTRRUPT VECTOR 1S LOGGED IN FLAG REG. 
15640 -eerererererererererererrereretererreretererererererererereerere 
15641 060402 181767: 

15642 060402 012700 000766 MOV #766,R0 7; SETUP MISSED TEST & FULL WRD TEST # PRIOR TO SCOPE 


15643 060406 000004 SCOPE ;CALL THE SCOPE LOOP UTILITY 
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1 
CHECK LAST INTRRUPT VE 


TOR 1S LOGGED IN FLAG REG. SEQ 0290 
MOV #1$,a930 ;LOAD EMT VECTOR WITH 1$ 
EMT SFIRST INTERRUPT == EMT 
1$: CMP (SP)+,(SP)¢ [CLEAN UP STACK 
MOV #SERROR 2430 ;RESTORE VECTOR 
MOV #2$,a84 SET UP CPU VECTOR 
TST 24160000 SFORCE TIMEOU e 
2: cMP (SP)+,(SP)¢ :CLEAN UP STAC 
MOV #BERR 284 :RESTORE BUS ERROR VECTOR 
D CHECK FLAG 
ROLFGINT 
PB RO,#30 EMT VECTOR LAST LOGGED? 
BEQ 3% ;BR IF YES 
ERROR 36 ;LOG FLAG/INT REG DID NOT LOG VECTOR 
;LO BYTE OF LOG FLAG/INT REG S/8=30 
3$: MOV #4$,a#20 ;LOAD 10T VECTOR WITH 4$ 
101 SECOND INTERRUPT=-SHOULD LOAD LOG FLAG REG 
4$: CMP (SP)+,(SP)+ ;CLEANUP STACK 
MOV + yp oh ,a#20 ;RESTORE JOT VECTOR 
MOV #5$,a ;SET UP CPU VECTOR 
TST 34160000 ;FORCE TIMEOUT 
5$: CMP (SP)+,(SP)+ ;CLEAN UP STACK 
MOV #BERR aes ;RESTORE BUS ERROR VECTOR 
MED CHECK FLAG 
ROLFGINT 
CMPB RO,#20 ;10T VECTOR LAST LOGGED? 
BEQ 6$ BR IF YES 
ERROR 36 ;LOG FLAG/INT REG DID NOT LOG VECTOR 
;LOW BYTE S/B = 20 
6$: MOV #STN-1,R0 SET UP FOR MISSED TEST CHECK AND 


;FULL WORD TEST NUMBER FOR APT 
ENABLE AMA 


-SBTTL END OF PASS ROUTINE 


ppeeeeeeererereererererererreritreeriteereeereerereeeeeeeere eee 
s* INCREMENT THE PASS NUMBER ($PASS) 

:*1F THERES A MONITOR GO TO IT 

:*1F THERE ISN’T JUMP TO INIT 


SEOP: 
SCOPE 
CLR STIMES 7;ZERO THE NUMBER OF ITERATIONS 
INC SPASS >; INCREMENT THE PASS NUMBER 
BIC #100000, $PASS ;;DON'T ALLOW A NEG. NUMBER 


DEC (PC)+ ;;LOOP? 
SEOPCT: .WORD 1 

BGT SDOAGN 33 Ves 

MOV (PC)+,a(PC)+ ;;RESTORE COUNTER 
SENDCT: ror 1 


TYPE -EOP1 :TYPE “‘END PASS #”° 


Scape 
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065121 
001012 


001115 
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377 


MACY11 30A(1052) 
END OF PASS ROUTI 


$GET42: 


SENDAD: 


SDOAGN: 


SRINAD: . 
000 SENULL: . 


G 
11-SEP-79 


NE 
SPASS ,-(SP) 


,E0P2 
SERTIL,-(SP) 
- SCRLF 
a#42,R0 
SDOAGN 


PC, (RO) 


a(PC)+ 


7 
13: 


53 PAGE 292 


fe: SPASS FOR TYPOUT 
TYPE PASS ee IN, OCTAL 
STYPE “ERROR COUNT = 
:SAvE ERROR TOTAL FOR TYPOUT 
TYPE ERROR TOTAL 


;GET MONITOR ADDRESS 
S TBRANCH IF NO MONITOR 


3 RETURN 
sENULL CHARACTER STRING 


SEQ 0291 
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END OF PASS ROUTINE SEQ 0292 

15718 0000000000000 OOOO OOOO OOOO 
15719 worm FF £ £ £ £ £ WHMIS & FF Fe #F F 
arse O0000000000000000000O00O OOOO OOOO T 
+a -SBTTL POWER DOWN AND UP ROUTINES 
197246 ppeeeeeerreeerrerrererererererererererereeereeeeeeeeeeeReeeeeeeee 
15725 ;POWER DOWN ROUTINE 
15726 060664 012737 061036 000024 S$PWRDN: MOV #SILLUP ,#PWRVEC ;;SET FOR FAST UP 
15727 72 012737 000340 000026 MOV #340 ,a#PWRVEC*2 ;;PRIO:7 
15728 060700 010046 MOV RO,-(SP) ;;PUSH RO ON STACK 
15729 060702 010146 MOV R1,-(SP) 7;PUSH R1 ON STACK 
15730 060704 010246 MOV R2,-(SP) ;;PUSH R2 ON STACK 
15731 0607 010346 MOV R3,-(SP) 7;PUSH R3 ON STACK 
15732 060710 010446 MOV R4,-(SP) 3;PUSH R& ON STACK 
15733 060712 010546 MOV R5,-(SP) 7:PUSH R5 ON STACK 
15734 060714 017746 120120 MOV aSwR ,-(SP) ;;PUSH @SWR ON STACK 
15735 060720 010637 061042 MOV SP ,SSAVR6 3;SAVE SP 
15736 0607246 012737 060736 000024 MOV #SPWRUP ,a#PWRVEC ;;SET UP VECTOR 
15737 060732 000000 HALT 
eres 060734 000776 BR 72 7;HANG UP 
15740 PL eMeeeeeerereeeererrerererereerererereeeeneneKeeerererereTeLeeee 
15741 ;POWER UP ROUTINE 
15742 060736 012737 061036 000024 $PwRUP: MOV WSILLUP a#PWRVEC ;;SET FOR FAST DOWN 
15743 060744 013706 061042 MOV SSAVR6,SP 33;GET SP 
15744 060750 005037 061042 CLR SSAVRO6 3;WAIT LOOP FOR THE TTY 
15745 060754 005237 061042 1$: INC SSAVR6 3;WAIT FOR THE INC 
15746 060760 001375 BNE 1$ :;0F WORD 
15747 060762 011600 MOV (SP) ,RO ;GET OLD SWR VALUE 
15748 060764 076600 MED ;WRITE BACK ORIGINAL SWR VALUE 
15749 060766 000226 WCNSSW INTO HARDWARE SWITCH REGISTER 
15750 060770 012677 120044 MOV (SP)+,aSWR 3:POP STACK INTO aSwR 
15751 060774 012605 MOV (SP)+*,R5 ;;POP STACK INTO R5 
15752 060776 012604 MOV (SP)+,R4 3;POP STACK INTO R4 
15753 061000 012603 MOV (SP)+,R3 ;:POP STACK INTO R3 
15754 061002 012602 MOV (SP)+,R2 ;:POP STACK INTO R2 
15755 061004 012601 MOV (SP)+,R1 ;;POP STACK INTO R1 
15756 061006 012600 MOV (SP)+,RO 3:POP STACK INTO RO 
15757 061010 012737 060664 000024 MOV #SPWRON ,AMPWRVEC ;;SET UP THE POWER DOWN VECTOR 
15758 061016 012737 000340 000026 MOV #340, ,a#PWRVEC*+2 ;;PRI0:7 

0610 0440 TYPE ;REPORT THE POWER FAILURE 
15760 061026 061044 PURMG: . WORD POWER >7POWER FAIL MESSAGE POINTER ils cali 
15761 061030 012716 MOV (PC)+, (SP) 3; :RESTART AT PWRUP 
15762 061032 061054 SPWRAD: .WORD PWRUP RESTART ADDRESS 
15763 061034 000002 RT] 
15764 061036 000000 $]LLUP: HALT 7: THE POWER UP SEQUENCE WAS STARTED 
15765 061040 000776 BR 72 3: BEFORE THE POWER DOWN WAS COMPLETE 
15766 061042 000000 SSAVR6: 0 ;;PUT THE SP HERE 
15767 0610464 005015 047520 042527 S$POWER: .ASCIZ <15><12>'’POWER™ 
15768 061052 000122 
13770 a 
15771 061054 012706 001000 PWRUP: MOV #@STACK,SP RESET SP 
15772 061060 005037 177776 CLR aePSw PRIORITY 0 == CLEAR CODES 
15773 061064 000137 001630 JMP @aSTART ;RESTART PROGRAM 
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POWER DOWN AND UP ROUTINES 


; eereeerrererrerrerererrerererererereererereteeeteeeereeereretereees 


-SBTTL “'T’’ BIT SERVICE ROUTINE 


b eeeeeereereereereeeereeeerereeeeereeeeeeeeeeeeeeeeeeeneeeeeeteeteeeeereee 
TBSER: ADD #2, (SP) :MOVE RETURN PC AROUND ERROR CALL 

BIC #20,2(SP) STURN OFF THE "'T’’ BIT 

RTT “RETURN TO THE CALLING TEST 


-SBTTL MICROBREAK TRAP SERVICE ROUTINE 


*-swereeerereeterereerrereeerereeeeeerereteeeeeeeeeeeeneneteeeeese 


ie THIS ROUTINE MERELY SETS A FLAG 

ie WHEN THE ROUTINE HAS BEEN ENTERED 

“* 

BKROUT: INC BKFLAG :SET MICROBREAK FLAG TO 


; INDICATE TRAP TO 4 OCCURRED 
RT1 RETURN FROM TRAP 
BKFLAG: .WwORD 0 ;MICROBREAK TRAP FLAG 


+ @eweeeeeeerereeererereetetererereeeeeeeeeeeeeteaeeeeteeeneeeeeeeerene 


; -SBTTL RSVD INSTRUCTION TRAP SERVICE ROUTINE 


p teeeeeererrerererrererertrrereeerrerereeeeeeeeenereereeeeerereerees 
THIS ROUTINE SERVICES UNEXPECTED RESERVED INSTRUCTION TRAP ERRORS 

:17 RESULTS IN PRINTING THE ERROR MESSAGE: "‘TRAPPED TO 10 PC=XXXXXX"" 
sWHERE XXXXKX 1S THE ADDRESS CONTAINING THE INSTRUCTION WORD THAT 
SPRUNG THE TRAP. AFTER PRINTING THE ERROR MESSAGE AN ATTEMPT IS 
;MADE TO RESTART THE PROGRAM AT THE BEGINNING. 


:1f THE TRAP 1S SPRUNG WHILE IN THE PROCESS OF TRYING TO SERVICE A 
PREVIOUS RSVD INSTRUCTION TRAP OR AN UNEXPECTED BUS ERROR THE PROGRAM 
WILL HALT. AFTER THE HALT THE STACK WILL CONTAIN INFORMATION RELATIVE 
TO THE TWO SUCCESSIVE TRAPS AS SHOWN BELOW: 


:CSP] _ PC+2 OF 2ND TRAP 
:CSPJ+2 PSwW - 
sCSPJ]+4 PC+2 OF 1ST TRAP 
:CSPJ+6 PSW = 


LOCATION ‘‘CATERR'’ CAN BE EXAMINED TO OBTAIN THE FOLLOWING 
> INFORMATION: 


;CCATERRJ=401 RSVD INSTR TRAP COMBINED WITH A BUS ERROR 
TRAP (PC AT TIME OF ERROR HALT INDICATES 
WHICH OCCURRED FIRST) 

sCCATERRJ=2 TWO SUCCESSIVE BUS ERROR TRAPS 

;CCATERRJ=1000 TWO SUCCESSIVE RSVD INSTR TRAPS 


THE CONTENTS OF RO AT THE TIME OF THE 
HALT PROVIDES FURTHER INFORMATION AS TO THE LAST TEST BEING EXECUTED 
;WHEN THE TRAPS OCCURRED. 


;THESE TWO INSTRUCTIONS ARE USED BY THE BASIC INSTRUCTION 


Tests TO VERIFY THE RSVO INSTR TRAP MECHANISM PRIOR TO ACTIVATING THE SERVICE 
;ROUTINE 


SEQ 0295 


ie 
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CQKDAD.P11 11-SEP-79 13:31 RSVD INSTRUCTION TRAP SERVICE ROUTINE SEQ 0294 
15830 061114 005137 063246 RSVTST: COM RSVFLG ;SET RSVD INSTR TRAP TEST FLAG 

Fe td} 061120 000002 RT1 > RETURN TO BASIC TEST 

15833 061122 005737 063252 RSERR: TST @aCATERR sANY PENDING CATASTROPHIC ERRORS 

15834 061126 001025 BNE INCRSV :B If YES 

15835 061130 105237 063253 INCB a7 1+CATERR ;SET RSVD INSTR FLAG 

18836 061134 032777 010000 117676 BIT #SW12,aSwWR s INHIBIT ERROR PRINT ? 

15837 061142 001015 BNE RESTAR ‘BR IF YES 

15838 061144 104401 TYPE :G0 TYPE ‘‘TRAPPED TO 10 PC="' 

158839 061146 065233 RSMSG 

15840 061150 011646 RSBERT: MOV (SP) ,-(SP) GET ERROR PC ON STACK FOR PRINTING 

15841 061152 104402 TYPOC TYPE THE ERROR PC 

15842 061154 104401 TYPE ‘OUTPUT CR / LF 

15843 061156 001115 SCRLF 

15844 061160 005237 001012 INC Q#SERTIL ;COUNT THE ERROR 

15845 061164 032777 100000 117646 BIT #B1115,aSwR HALT ON ERROR? 

15846 061172 001401 BEQ RESTAR ;BR IF NOT 

15847 061174 000000 HALT HALT ON ERROR=-PRESS CONTINUE TO RESTART 
15848 061176 000137 003262 RESTAR: JMP aw INIT :G0 ATTEMPT RESTART 

15849 061202 105237 063253 INCRSV: INCB a#1+CATERR : INCREMENT RSVD INSTR FLAG 

15850 061206 000000 HALT ; CATASTROPHIC ERROR HALT 

15851 061210 000772 BR RESTAR :DEPRESSING CONTINUE WILL CAUSE 

a 2338 ATTEMPT TO RESTART. 

15854 ; teweeeererererererererererereeterererereeReereneteeeeeeeereeeeeeeess 
15855 .SBTTL BUS ERROR TRAP SERVICE ROUTINE 

15856 1 RET eEAeEKEKeRKKEKAKEKAAARATARKARATAEAKTKARARARAARERARARARRAERERERATEAReTReeees 
15857 

15858 :THIS ROUTINE SERVICES UNEXPECTED BUS ERROR TRAPS (BUS TIMEOUT, ODD ADDRESS 
15859 ERRORS, STACK OVERFLOW, AND ILLEGAL INSTRUCTIONS). IT RESULTS IN PRINTING THE 
15860 ERROR MESSAGE: “‘TRAPPED TO 4 PC =XXXXXX'' WHERE XXXXXX 1S THE 

15861 :CONTENTS OF THE PC WHEN THE TRAP WAS SPRUNG. AFTER PRINTING THE 

15862 :ERRGR MESSAGE AN ATTEMPT 1S MADE TO RESTART THE PROGRAM AT 

lines 3; THE BEGINNING. 

4 

15865 :1F THE TRAP IS SPRUNG WHILE IN THE PROCESS OF TRYING TO SERVICE A PREVIOUS 
15866 sRSVD INSTR TRAP OR A PREVIOUS BUS ERROR, THE PROGRAM WILL HALT. 

15867 AFTER THE HALT THE STACK WILL CONTAIN INFORMATION RELATIVE TO THE 

anes :TWO SUCCESSIVE TRAPS AS SHOWN BELOW: 

15870 3CSP) PC+2 OF 2ND TRAP 

15871 3CSPJ]+2 PSwW wi 

15872 sCSP]+4 PC+2 OF 1ST TRAP 

+ ty ;CSP]+6 PSw m 

4 

15875 LOCATION "CATERR' CAN BE EXAMINED TO OBTAIN THE LOLLOWING 

is $4] : INFORMATION: 

1 

15878 sCCATERR]=401 RSVD INSTR TRAP COMBINED WITH A BUS ERROR 
15879 sTRAP (PC AT TIME OF ERROR HALT 

15880 INDICATES WHICH OCCURRED FIRST) 

15881 sCCATERRJ=2 TWO SUCCESSIVE BUS ERRORS 

15882 sCCATERRJ=1000 TwO SUCCESSIVE RSVD INSTR TRAPS 

15883 

15884 :THE CONTENTS OF RO AT THE TIME OF 

15885 :THE HALT PROVIDED FURTHER INFORMATION AS TO THE TEST IN PROGRESS 


K 7 
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CQKDAD.P11 11-SEP-79 13:31 BUS ERROR TRAP SERVICE ROUTINE SEQ 0295 
12e08 ;WHEN THE TRAPS OCCURRED. 

15888 ;THE CONTENTS OF THE SP CAN BE USED TO INDICATE IF STACK OVERFLOW CAUSED 
e+ ;THE BUSS ERROR TRAP(S) AS SHOWN BELOW: 

15891 7400>CSP]>336 YELLOW ZONE 

Fe 24 :CSP)=0 RED ZONE 

15894 sTHESE TWO INSTRUCTIONS ARE USED BY THE BASIC INSTRUCTION TESTS TO 
15895 ;VERIFY THAT THE BUS ERROR TRAP MECHANISM WORKS PRIOR TO ACTIVATING 
Pe ts ;THE SERVICE ROUTINE 

15898 061212 005137 063250 BETST: COM BERFLG 3;SET BUS ERROR TRAP TEST FLAG 

+ 044 061216 000002 RTl ;RETURN TC BASIC TEST 

15901 061220 005737 063252 BERR: TST @a#CATERR ;ANY CATASTROPHIC ERRORS PENDING? 
15902 061224 001011 BNE 23 ‘BR IF YES 

15903 061226 105237 063252 INCB OFCATERR 3SET CATASTROPHIC — FLAG 

15904 061232 032777 010000 117600 BIT #SW12,aSwR ; INHIBIT ERROR PRIN 

15905 061240 001356 BNE RESTAR “BR IF YES 

18906 061242 104401 TYPE sPRINT ‘‘TRAP TO 4°* MESSAGE 

15907 061244 065206 BEMSG 

$44 061246 000740 BR RSBERT ; TYPE REST OF BUS ERROR MESSAGE 
15910 061250 105237 063252 2$: INCB @ACATERR sSET CATASTROPHIC ERROR FLAG 

15911 061254 000000 HALT s CATASTROPHIC ERROR HALT=SCHOOLS OUT 
+4 061256 000747 BR RESTAR sDEPRESS CONTINUE TO ATTEMPT RESTART 
15914 

19915 

44-44 | -SBTTL SCOPE HANDLER ROUTINE 

15918 4 peeeeeeeeetrrrerereereereeterreeeteeeeeeeeeeeeeeeeKereeeeeReeee 
19919 SSTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
15920 :*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
15921 :®AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

19922 3*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

1$923 *SW14=1 LOOP ON TEST 

19924 :*Swil=1 INHIBIT ITERATIONS 

19925 3*Sw09=1 LOOP ON ERROR 

15926 7 *CALL 

15927 :* SCOPE 3; SCOPE=10T 

15928 

15929 061260 SSCOPE: 

15930 061260 020037 001124 CMP RO, a#STESTIN ¢ ANY MISSED TESTS ? 

15931 061264 001406 BEQ R IF NOT 

15932 061266 012737 061276 001112 MOV #12$,a#SESCAPE :NO ERROR LOOPING 

15933 061274 104011 ERROR 11 MISSED TESTS ERROR CALL 

15934 061276 005037 001112 12$: CLR @#SESCAPE NORMAL ERROR LOOPING 

15935 061302 110037 001002 10$: MOVB RO, a#STSTNM s INSURE TSTNUM IS CORRECT 

15936 061306 032777 002000 117524 BIT ree -Geue LOOP ON SELECTED TEST? 

15937 061314 001411 BEQ 11% ‘BR 1F NO 

15938 061316 017737 117516 063242 MOV aSWR ,a*SELTST ;GET CONTENTS OF SWITCHES 

15939 061324 042737 177000 063242 BIC #177000, @#SELTST sMASK OUT SWR<15:9> 

15940 061332 020037 063242 CMP RO,a #SELTST i1$ THIS. THE SELECTED TEST? 

15941 061336 001510 BEQ sOvER :BR lf YES 
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SCOPE HANDLER ROUTINE 


118: 
1$: BIT 
8 


NE 
;AAARASTART 
SXTSTR: BR 


5$: CMP 


TST 


1$: MOV 
SSVLAD: 


SOVER: 


10$: 
SMXCNT: 
SCOPEA: 


#B1T14,aSwR 
SOVER 


OF CODE FOR THE XOR 
6$ 


Q#ERRVEC,-(SP) 
#5$ a#ERRVEC 
a#177060 

(SP) +, a#ERRVEC 
$SVLAD 


(SP)+,(SP)+ 
ee ,@MERRVEC 


7 LOOP 
Seat ee THE KOR TESTERSMAMM 


3$ 
oe 
#B1T09,aSwWR 
4$ 
SLPERR,SLPADR 
SOVER 

SERFLG 

STIMES 

1$ 
#B1T11,aSWR 
1$ 


$PASS 
1$ 


SICNT 
STIMES,SICNT 
SOVER 
#1,S1CNT 
SMXCNT,STIMES 
STSTNM 
STSTNM,STESTN 
(SP) ,SLPADR 
(SP) ,SLPERR 


SESCAPE 
#1, SERMAX 


STSTNM,@DISPLAY 


SLPADR, (SP) 
RO,a#STSTNM 
10$ 


RO 
RO,@#STESTN 


O#SCOFLG 


? 
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; LOOP ON PRESENT TEST? 

:YES IF Swi4=1 
TESTERSHHAM 
331F RUNNING ON THE “*XOR"’ TESTER CHANGE 
3;THIS INSTRUCTION TO A ‘'NOP’’ (NOP=240) 
23 SAVE THE aap le OF THE ERROR VECTOR 
23 SET FOR TIMEOUT 

E OUT ON XOR? 
;;RESTORE THE ERROR VECTOR 
3;GO0 TO THE NEXT TEST 
;;CLEAR THE STACK AFTER A TIME OUT 
: sRESTORE THE ERROR VECTOR 
ON THE PRESENT TEST 


ts — OCCURRED? 

3;MAX. ERRORS FOR THIS TEST OCCURRED? 
3;BR IF NO 

oe i Far 


N 
3;SET LOOP ADDRESS TO LAST SCOPE 


3;ZERO THE ERROR FLAG 
3;CLEAR THE NUMBER OF ITERATIONS TO MAKE 
;;ESCAPE TO THE NEXT TEST 
;: INHIBIT ITERATIONS? 
;;BR IF YES 
ielF FIRST PASS OF PROGRAM 

INHIBIT ITERATIONS 
:; INCREMENT ITERATION COUNT 
;;CHECK THE NUMBER OF ITERATIONS MADE 
3;BR IF MORE ITERATION REQUIRED 
;;REINITIALIZE THE ITERATION COUNTER 
;;SET NUMBER OF ITERATIONS TO DO 
;;COUNT TEST NUMBERS 
3:;SET TEST NUMBER IN APT MAILBOX 
:;SAVE SCOPE LOOP ADDRESS 
;;SAVE ERROR LOOP ADDRESS 
;;CLEAR THE ESCAPE FROM ERROR ADDRESS 
7;ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
;;DISPLAY TEST NUMBER 
;:FUDGE RETURN ADDRESS 
sWAS STSTNM INCREMENTED? 
7BR IF NOT 
; INCREMENT TEST NUMBER 
;F1X STESTN TO BE WORD COUNT, 


7;MAX. NUMBER OF ITERATIONS 
; THESE TWO INSTRUCTIONS ARE 


;USED IN THE BASIC TESTS TO 
VERIFY THE JOT LINKAGE 


NOT BYTE 





SEQ 0296 
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~SBTTL ERROR HANDLER ROUTINE 


7 
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peeeeeereeerereererrererereeeereeeeeereeeerereeeeeeerereeeereres 
eTHIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
s*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
;*AND GO TO SERRTYP ON ERROR 

s*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


*SW15=1 
3*SW13=1 
:*$W09=1 

:*CALL 


SERROR: 


10$: 
7$: 


208: 


HALT ON ERROR 


INHIBIT ERROR TYPEOUTS 


LOOP ON ERROR 


N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 
R5,-(SP) ;SAVE_R5 ON STACK 

#SREGAD ,R5 ;GET POINTER 

4(SP),(R5)+ + SAVE ERROR PSW IN SREGAD FOR TYPOUT 
RO,(R5)¢ SAVE RO FOR TYPEOUTS 

R1,(R5)¢ SAVE R1 IN S$REG1 

R2,(R5)+ :SAVE Re IN SREG2, ETC. 

R3,(R5)+ 

R4,(R5)+ 

#-1,(R5) 31S SP ALREADY STORED IN $REG5S? 
10$ :BR IF YES 

SP, (RS) ;PUT SP_IN S$REGS FOR TYPOUT 
(SP)+,R5 sRESTORE RS 

SERFLG :;SET THE ERROR FLAG 


7$ 
STSTNM,@DISPLAY 
SERTTIL 


(SP) ,SERRPC 
PC 


#2,SERR 
@SERRPC,SITEMB 


#B1T13,aSwR 
208 


PC ,SERRTYP 
- SCRLF 


#APTENV,SENV 
2% 


SITEMB,21% 
eral 


0 

22% 

aSwR 

3$ 
#B1T09,aSWR 
4$ 


SLPERR, (SP) 
SESCAPE 


5$ 
SESCAPE , (SP) 
#-1,a#SREGS 


7;DON'T LET THE FLAG GO TO ZERO 

+ sDISPLAY TEST gn AND ERROR FLAG 
; INC THE ERROR COUN 

::GET ADDRESS OF ERROR INSTRUCTION 


3:STRIP AND SAVE THE ERROR ITEM CODE 
:;SKIP TYPEOUT IF SET 

:;SKIP_ TYPEOUTS 

::GO0 TO USER ERROR ROUTINE 


;;RUNNING IN APT MODE 

3:NO,SKIP APT ERROR REPORT 

;;SET ITEM NUMBER AS ERROR NUMBER 
;;REPORT FATAL ERROR TO APT 


;;APT ERROR LOOP 

;;HALT ON ERROR 

:3SKIP IF CONTINUE 

;;HALT ON ERROR! 

;;LOOP ON ERROR SWITCH SET? 

:3:BR IF NO 

;;FUDGE RETURN FOR LOOPING 
;;CHECK FOR AN ESCAPE ADDRESS 
;:BR IF NONE 

;;FUDGE RETURN ADDRESS FOR ESCAPE 


FLAG CURRENT STACK PCINTER TO BE TYPED 


SEQ 0297 
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@#ERRFLG 
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;CLEAR T BIT ° CASE ERROR OCCURED 
;IN T BIT TESTS 


THESE TWO INSTRUCTIONS ARE USED 
IN THE BASIC TESTS TO VERIFY THE EMT 


-SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


seeeererrrerrererereerereererereererereeeeereeAeeKKAeKeneeeeeee 


TeTHIS ROUTINE USES THE “ITEM CONTROL BYTE’’ (SITEMB) TO DETERMINE WHICH 


;*ERROR 1S TO BE REPORTED. 


1T THEN OBTAINS, FROM THE “ERROR TABLE’ (SERRTB), 


Z*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


SERRTYP: 


2$: . WORD 


3$: MOV 


4$: WORD 


S$: MOV 
6$: MOV 


7$: 


8$: -ASCIZ 


- SCRLF 
RO,-(SP) 


R 
a#$1TEMB,RO 
1$ 


SERRPC ,-(SP) 


R 
#SERRTB,RO 
(RO)+,2$ 
3$ 


0 
-SCRLF 
(RO+, 4$ 


0 

- SCRLF 

(RO) ,RO 

7$ 

(SP)+,RO 

- SCRLF 

PC 
a(RO)+,-(SP) 
(RO) 

6$ 
8% 


7$ 
ee 


33""CARRIAGE RETURN’ & “LINE FEED" 


V 
;;PICKUP THE ITEM INDEX 


731F ITEM NUMBER IS ZERO, JUST 

7; TYPE THE PC OF THE ERROR 

3;SAVE SERRPC FOR TYPEOUT 

ERROR ADDRESS 

;;60 iP chen ASCIICALL DIGITS) 


33GET 
cE RDUUST THE INDEX SO THAT IT WILL 
a3 WORK FOR THE ERROR TABLE 


7:FORM TABLE POINTER 

7;PICKUP ‘ERROR MESSAGE'* POINTER 
;;SKIP TYPEOUT IF NO POINTER 

3; TYPE THE "‘ERROR MESSAGE" 
77""ERROR MESSAGE’’ POINTER a 
73""CARRIAGE RETURN’’ & “LINE 
7;PICKUP ‘‘DATA HEADER" POINTER 
3;SKIP TYPEOUT IF 0 

7: 1YPE THE ‘‘DATA HEADER" 

3;'‘DATA HEADER’’ POINTER GOES HERE 
3:""CARRIAGE RETURN’ & “LINE FEED" 
;;PICKUP "DATA TABLE’ POINTER 
+360 TYPE THE DATA 

; RESTORE RO 

IR rh gee RETURN’ & “LINE FEED" 


>;SAVE a(RO)+ FOR TYPEOUT 

7:G0 TYPE--OCTAL ASCII(ALL DIGITS) 
3231S THERE ANOTHER NUMBER? 

7;BR IF NO 

>; TYPE TwO(2) SPACES 

3;LO0P 

3:7wO(2) SPACES 


geeeeeeerereeeeeeeeeeeerieeeeeeeeeeaeeteetekeeeeeeeereeeteeeeeeee 


SEQ 0298 
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-SBTTL PRINT ROUTINES 


; THESE TwO INSTRUCTIONS ARE 
USED BY THE BASIC TESTS TO VERIFY 
7 THE TRAP INSTRUCTION 


PRINA: COR @#PRIFLG 
RTI 


-SBTTL TYPE ROUTINE 


peeeeeeererrerrerereererererererrerrereReeeeerereReeererereneeTe 


¢ *ROUT INE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 gif 


s*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
> *NOTE1: SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
s*NOTE2: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
s*NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
*@ 
> *CAL 
se) MUSING A A TRAP INSTRUCTION 
_ TYPE »MESADR 7;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
ie 
ie TYPE 
3* MESADR 
7* 
STYPE: TSTB STPFLG 71S THERE A TERMINAL? 
BPL 1$ SBR IF YES 
HALT 7 7;HALT HERE IF NO TERMINAL 
BR 3$ 7; LEAVE 
1$: MOV RO,-(SP) 7;SAVE RO 
MOV a2(SP),RO 2 3GET ADDRESS OF ASCIZ STRING 
CMPB #APTENV,SENV 3;RUNNING IN APT MODE 
BNE 62$ 3NO,GO CHECK FOR 27F CONSOLE 
B1TB #APTSPOOL , SENVM SPOOL MESSAGE TO A 
BEQ 62$ art GO CHECK FOR con $0 E 
MOV RO,618 ;SETUP MESSAGE ADDRESS FOR APT 
JSR PC, SATYS ;SPOOL MESSAGE TO APT 
61$: -wORD 0 i IRESSAGE ADDRESS 
628: BITB #APTCSUP,SENVM APT con — 
BNE 60% eyes. SKIP TYPE OUT 
2$: MOVB (RO) +,-(SP) PUSH CHARACTER TO BE TYPED ONTO STACK 
BNE 4% ::BR IF IT ISN'T THE TERMINATOR 
TST (SP)+ :;1f TERMINATOR POP IT OFF THE STACK 
603: MOV (SP)+,RO s RESTORE RO 
3$: ADD #2, (SP) + ADJUST RETURN PC 
RTI 7 ;RETURN 
4$: CMPB #HT, (SP) : : BRANCH IF <HT> 
BEQ 8&$ 
CMPB #CRLF, (SP) >;BRANCH IF NOT <CRLF> 
BNE 5% 
TST (SP)+ 7;POP <CR><LF> EQUIV 
TYPE ::TYPE A CR AND LF 
SCRLF 
CLRB SCHARCNT :;CLEAR CHARACTER COUNT 
BR 23 3:GET NEXT CHARACTER 
5$: JSR PC, STYPEC 3:G0 TYPE THIS CHARACTER 
6$: CMPB SFILLC,(SPi¢ ::1S 11 TIME FOR FILLER CHARS.? 


SEQ 0299 
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000015 


00 

105037 062466 
000406 

122766 000012 


062466 


116414 
000002 


000002 


TYPE R 


7$: 


HORIZONTAL TAB 


8$: 
9$: 


STYPEC: 


1 


SCHARCNT: 


$: 


B 
. WORD 


STYPEX: RTS 


-SBTTL BINARY TO OCTAL (ASCII) 


peeeerereeeerererrererrerererereterereeeeeeeeeereeeeKeneReLE LETS 


eTHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 


C 
MACY11 loti 11-SEP-79 18. 


23 
SNULL ,- (SP) 
TCSP) 

$ 


6 
PC ,STYPEC 
SCHARCNT 
7% 


PROCESSOR 


g" , (SP) 
PC, STYPEC 
#7 .SCHARCNT 
9% 


(SP)+ 

23 

asTPs 
STYPEC 
2(SP) ,aSTPB 
#@CR,2¢SP) 
1$ 
SCHARCNT 
STYPEX 
#LF ,2(SP) 
STYPEX 
(PC)+ 


0 
PC 


53 PAGE 301 


331F NO GO GET NEXT CHAR. 
3 3GET # OF FILLER CHARS. NEEDED 
AND THE NULL CHAR, 
; DOES A NULL NEED TO BE TYPED? 
IF wt ~~, THE NULL OFF OF STACK 


3360 rte 


3300 T COUNT As A COUNT 


top Ay 


; REPLACE os Mt SPACE 


3; TYPE A SPA 


44 ys IF NOT AT 


STOP 
::POP SPACE OFF STACK 
33;GET NEXT CHARACTER 
7;WAIT UNTIL PRINTER IS READY 


;;LOAD CHAR TO BE TYPED INTO DATA REG. 
3:18 CHARACTER A CARRIAGE RETURN? 


; ;BRANCH 


IF NO 
3 YES@=CLEAR CHARACTER COUNT 


sEXIT 
T:1S CHARACTER A LINE FEED? 
;;BRANCH IF YES 
;;COUNT THE CHARACTER 
3; CHARACTER COUNT STORAGE 


AND TYPE 


S*OCTAL (ASCII) NUMBER AND TYPE 1T 


se TYPOS=--ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


; ;NUMBER TO BE ie 
3;CALL FOR TYPEOU 
;:N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 


CALL: 


MOV 
TYPOS 
-BYTE 


NUM, = (SP) 


:*STYPOS OR $STYPOC 


> *CALL: 


** 


3 CALL: 


MOV 
TYPON 


MOV 
TYPOC 


NUM, -(SP) 


NUM, = (SP) 


=1 OR 0 


33 1=TYPE LEADING ZEROS 
3;0=SUPPRESS LEADING ZEROS 


{ #STYPON===-ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
> NUMBER TO BE TYPED 

7;CALL FOR TYPEOUT 

:t 

:*STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


> ;NUMBER TO BE TYPED 
>:CALL FOR TYPEOUT 





SEQ 0500 


CQKDA-D KDI1-K BASIC 


CQKDAD.P11 


16222 062472 
1622 gece ts 


715 0 
16273 062716 000000 


11 -SeP=99 4 


SoS 


—O00 ——— 
Oe ed ed et 
So 
FAaG 
COO nNN~N 


sugtgos 
SSSesRes 


005 


062716 
177770 


000060 


062714 


000002 000004 


spb S0A(1052) 11-SEP-79 > 8. 753 PAGE 302 


ARY TO OCTAL (ASCII) AND TYPE 


STYPOS: MOV @(SP),-(SP) 


MOvB 1(SP) ,SOFILL 
MOVE (SP)+, SORODE+1 
ADD #2, (SP) 
BR STYPON 
STYPOC: MOVB #1,SOFILL 
MOVE 6,$ +1 
STYPON: MOVB #5, S0CNT 
MOV R3,-(SP) 
ROV R4,-(SP) 
MOV R5,-(SP) 
MOvB SORODE*1, RG 
NEG 
ADD 0.8 
MOVB Re SORODE 
MOVB SOFILL RS 
MOV 12(SP),R5 
CLR R3 
1$ ROL RS 
BR 3$ 
23 ROL RS 
ROL RS 
ROL RS 
MOV R5,R3 
3$ ROL R3 
DECB SOMODE 
BPL 
BIC #177770,R3 
BNE 
TST RG 
BEQ 5$ 
4$ INC R4 
BIS #'O,R3 
5$ BIS , 
MOvVB R3,88% 
TYPE ,8$ 
7$ DECB SOCNT 
BGT 2$ 
BLT 6$ 
INC RG 
BR 
6$: MOV (SP)+,R5 
MOV (SP)+,R4 
MOV (SP)+,R5 
MOV 2(SP),4(SP) 
MOV (SP)+, (SP) 
RTI 
8$ BYTE 0 
BYTE 0 
SOCNT: BYTE 0 
SOFILL: .BYTE 0 
SOMODE: .WORD 0 


;;PICKUP THE MODE 
+ 3LCAD ZERO FILL SWITCH 

ER OF DIGITS TO TYPE 
;;ADJUST RETURN ADDRESS 


3;SET THE ZERO FILL SWITCH 
:;SET FOR SIX(6) DIGITS 
3;SET THE ITERATION COUNT 
7; SAVE R3 


; R5 
;;GET THE NUMBER OF DIGITS TO TYPE 


;;SUBTRACT 1T FOR MAX. ALLOWED 
;;SAVE IT FOR USE 

3;GET THE ZERO FILL SWITCH 
;;PICKUP THE INPUT NUMBER 
3;CLEAR THE OUTPUT WORD 
;;ROTATE MSB INTO ‘'C’’ 


;;G0 DO MSB 
;;FORM THIS DIGIT 


::GET LSB OF THIS DIGIT 

3; TYPE THIS DIGIT? 

3:BR IF NO 

3;GET RID OF JUNK 

:; TEST FOR O 

7; SUPPRESS THIS 0? 

3;BR IF YES 

3;DON'T SUPPRESS ANYMORE 0°S 

73MAKE THIS DIGIT ASCII 

>;MAKE ASCII IF NOT ALREADY 

:;SAVE FOR TYPING 

3:G0 TYPE THIS DIGIT 

::; COUNT BY 1 

7;BR IF MORE TO DO 

7:BR IF DONE 

+ INSURE LAST DIGIT ISN'T A BLANK 
;G0 DO THE LAST DIGIT 

> RESTORE R R5 

s RESTORE R4 

s RESTORE R3 

::SET THE STACK FOR RETURNING 


> ;RETURN 

::;STORAGE FOR ASCII DIGIT 

:; TERMINATOR FOR TYPE ROUTINE 
:;OCTAL DIGIT COUNTER 

3;ZERO FILL SWITCH 

s;NUMBER OF DIGITS TO TYPE 


~SBTTL APT COMMUNICATIONS ROUTINE 


sseeereceeereeseereereeesneceeeeeseeeteresenesrenerensereerenetes 


SEQ 0301 


--——- - SY 


CQKDA-D KDI1-K 
CQKDAD.P11 


-—-OooOo — 
o—— —_ 


SSFlLSaSxnS 


3223852 


000040 


o 

i 
we 
wo 


s 


000001 


063162 
000001 
000100 
000004 
000002 
001120 


001134 


001134 


001136 
000004 


000004 


063164 
001140 
001120 
000004 


063162 


-_—mn 
uo 
“4 
n“ 


063164 
063162 


063164 


001340 
001141 


000004 


001120 


063074 
000004 


001122 
000004 





E 
MACY11 S0AC1052) 11-SEP-79 8. 


APT COMMUNICATIONS ROUTINE 


SATY1: WOvVB #1,SFFLG 
SATY3: MOVB #1, SRFLG 
BR SATYC 
SATY4: WMOVB #1,SFFLG 
SATYC: 
MOV RO,-(SP) 
MOV R1,-(SP) 
TSTB SMFLG 
BEQ 5$ 
CMPB #APTENV,SENV 
BNE 3$ 
B1TB #APTSPOOL , SENVA 
BEQ 3$ 
MOV a4(SP),RO 
ADD #2,4(SP) 
1$ TST SASGTYPE 
BNE 1$ 
MOV RO, SMSGAD 
28: TSTB (RO)+ 
BNE 23 
SUB SMSGAD,RO 
ASR RO 
MOV RO, SMSGLGT 
MOV #4, SMSGTYPE 
BR 5$ 
3$ MOV a4(SP) ,4$ 
ADD #2,4(SP) 
MOV 177776,-(SP) 
JSR PC STYPE 
4$: -wORD 0 
5$: 
108: TSTB SFFLG 
BEQ 128% 
TST SENV 
BEQ 12$ 
118: TST SMSGTYPE 
BNE 118% 
MOV 4(SP), SFATAL 
ADD #2,4(SP) 
INC SMSGTYPE 
128: CLRB SFFLG 
CLRB SLFLG 
CLRB SMFLG 
MOV (SP)+,R1 
MOV (SP)+,RO 
RTS PC 
SMFLG: .BYTE 0 
$LFLG: .BYTE 0 
SFFLG: .BYTE 0 
EVEN 
APTS1ZE=200 
APTENV=001 


APTSPOOL=100 
APTCSUP=040 


-SBTTL TRAP DECODER 
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SEQ 0302 


3:10 REPORT FATAL ERROR 
3310 TYPE A MESSAGE 


3:10 ONLY REPORT FATAL ERROR 


7;PUSH RO ON STACK 
7;PUSH R1 ON STACK 
+H gf TYPE A MESSAGE? 


IF BR 
: OPERATING UNDER APT? 
NOT: BR 


i: SHOULD SPOOL MESSAGES? 

;1F NOT: BR 

::GET MESSAGE ADDR. 

;;BUMP RETURN ADDR. 

::SEE IF DONE W/ LAST XMISSION? 
331f NOT: WAIT 
it puT ADDR IN MAILBOX 
;;FIND END OF MESSAGE 


;;SUB START OF MESSAGE 

3;GET MESSAGE LNGTH IN WORDS 
;;PUT LENGTH IN MAILBOX 
3;TELL APT TO TAKE MSG. 


::PUT MSG ADDR IN JSR LINKAGE 
“BUMP RETURN ADDRESS 

PUSH 199776 ON STACK 

*: CALL TYPE MACRO 


+s SHOULD has * FATAL ERROR? 
N 


OT: 
¢ ;RUNNING UNDER APT? 


;1f NOT: 6R 
i FINISHED LAST MESSAGE? 
s1f NOT: WAIT 


GET ERROR B 
;BUMP RETURN ADDR. 
s3 TELL abt TO TAKE ERROR 
: CLEAR FATAL FLAG 
3; CLEAR LOG FLAG 
3;CLEAR MESSAGE FLAG 
3:;POP STACK INTO R1 
::POP STACK INTO RO 


7 FATAL FLAG 
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16334 

16335 

16336 

16337 

16338 

16339 

16340 

16341 063166 010046 
16342 063170 016600 
16345 063174 00574 
16344 063176 111000 
16345 063200 300 
16346 063202 016000 
16347 065206 200 
16348 

16349 

16350 

16351 

16352 063210 011646 
16353 063212 016666 
16354 063220 000002 
16355 

16356 

16357 

16358 

16359 

16360 

16361 

16362 

16363 063222 065210 
16364 063224 062210 
16365 063226 062516 
16366 063230 062472 
16367 063232 062532 
16368 

16369 

16370 

16371 

16372 

16373 063234 000000 
16574 

16375 063236 00 
16376 063240 000000 
16377 063242 000000 
16378 063244 00000 
16379 063246 000000 
16 063250 000000 
16381 0635252 000000 
16382 

16383 063254 000000 
16384 

16385 

16 063256 177400 
16387 063260 177400 
16388 063262 177400 
16389 065264 177400 


000002 


063222 


900004 000002 
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TRAP DECOD 


peeeeerrerrereereeeereeeereeeerererereererereereeerreerertererre 
SaTHIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “‘TRAP’’ INSTRUCTION 
[AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
7*CF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WiLL 


:*60 10 
STRAP: 


THAT ROUTINE. 
MOV RO,-(SP) 
MO 


TST =(RO) 
MOVB (RO) ,RO 
ASL RO 


MOV STRPAD(RO) ,RO 
RO 


AVE RO 
ciety TRAP ADDRESS 
> BACKUP BY 2 
7:;GET RIGHT BYTE OF TRAP 
:;POSITION FOR INDEXING 
>; INDEX TO TABLE 
::G0 TO ROUTINE 


;:THIS 1S USE TO HANDLE THE "'GETPRI"’ MACRO 


STRAP2: 


~SBTTL 


MOV (SP) ,-(SP) 
MOV 4(SP) ,2(SP) 
RTI 


TRAP TABLE 


;;MOVE THE PC DOWN 
;:MOVE THE PSW DOWN 
7 RESTORE THE PSw 


y*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
*BY THE ‘‘TRAP’’ INSTRUCTION. 


STRPAD: 


sFLAGS, 


ROUTINE 

~WORD S$TRAP2 

STYPE 3; CALL=TYPE 
STYPOC ;;CALL=TYPOC 
$TYPOS ;;CALL=TYPOS 
$STYPON ;;CALL=TYPON 


CONSTANTS, AND VARIABLES 


BPTLOC: 0 


PRIFLG: 


CATERR: 
ONCE: 
: COMMON 
OBUF : 


aa OOoooo°oeo 


ATA STRUCTURES AND MISC 


TRAP+1(104401) TTY TYPEOUT ROUI INE 


SEQ 0505 


TRAP#2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TRAP*+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 


STORES 16 USER DEFINED MAINTENANCE 
:BREAKPOINTS 

7FLAG USED BY BASIC TESTS FOR TRAP TEST 
FLAG USED BY BASIC TESTS FOR EMT TEST 
STORES SR<8:0> FOR LOOP ON 1} TEST 
[USED BY BASIC TESTS FOR 10T TEST 

sFLAG USED BY BASIC TEST OF RSVD INSTR TRAP 
;FLAG USED BY BASIC TEST OF BUS ERROR TRAPS 
:FLAGS USED BY BUS ERROR AND RSvD INSTR TRAP 
i SERVICE ROUTINES 

LAGS PROGRAM TITLE HAS BEEN PRINTED 

ELLANEOUS TABLES 


:0L11 OUTPUT TEST BUFFER 





=) 
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QKDA 1-SEP- TRAP T 
6390 
+44 063266 000004 1BUF : -BLKW 4 :0L11 INPUT TEST BUFFER 
16393 063276 063322 ATA: DWTA 
16394 063300 064032 DwiB 
16395 063302 064630 DBTA 
16396 063306 064634 OBTB 
16397 063306 063312 MBUFO 
Mpg 44 063310 063316 MBUF 1 
16400 063312 000000 mBUFO: 0 
16401 063314 00 0 
16402 063316 000000 MBUF1: 0 
16403 063320 000000 0 
16404 063322 000000 DWTA: 0 
16405 063324 177777 -| 
16406 063326 177400 177400 
16607 3330 000377 377 
16408 063332 125252 125252 
seed 063334 052525 ALUADD: 052525 ALSO SERVES AS NULL ENTRY FOR ALUADD 
16411 sTHIS TABLE OF 8 ENTRIES IS USED BY THE ALU ADD TEST IN THE 
rie ;COMBINED INSTRUCTION TESTS 
16414 063336 000000 000000 SRC OPI 
16415 063340 000000 000000 :DST OPI 
16416 063 000000 000000 :ANS1 
16417 063344 177777 177777 SRC OP2 
16418 063 177777 177777 :0ST OP2 
16419 063350 177776 177776 :ANS2 
16420 063352 125252 125252 SRC OP3 
16421 063354 052525 052525 0ST OP3 
16422 063356 177777 177777 $ 3 
16423 063360 052525 052525 SRC OP4 
16424 063362 125252 125252 DST OP4 
16425 063364 177777 177777 7 ANSS 
16426 063 125252 125252 SRC OPS 
16427 063370 125252 125252 :0ST OPS 
16428 063372 052524 052524 7 ANSS 
16429 063374 052525 052525 SRC OP6 
16430 063376 052525 052525 20ST OP6 
16431 0634 125252 125252 : ANS6 
16432 063402 052525 052525 sSRC OP7 
16433 063404 125253 125253 30ST OP7 
16434 063406 000000 000000 : ANS? 
16435 063410 125253 125253 sSRC OP8 
164 063412 052525 052525 0ST OP8 
+4 «4 063414 000000 ANDTAB: 000000 :ANS8 == ALSO NULL ENTRY FOR ANDTAB 
164 
16439 sTHIS TABLE OF 8 ENTRIES IS USED BY THE ALU “‘AND'’ TESTS IN THE 
tr | ;COMBINED INSTRUCTION EXERCISER TESTS 
1644 
16442 063416 000000 000000 sSRC OPI 


16443 063420 000000 000000 DESI OP 1 
16445 063424 177777 177777 sSRC OP2 





4 
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CQKDAD.P11 \l- TRAP TABLE SEQ 0505 


_ 
~e@ 
~~ Mme 


177777 3081 OP2 
000000 3 AN 
000000 SRC OP3 
177777 DST _OP3 
177777 SANS 3 
177777 SRC OP4 
0000 ;0ST OP4 
000000 ; ANS4 
125252 ;SRC OPS 
125252 ;0ST OPS 
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ww 
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MVNININMONNO 
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13:3 


ESTS 
1 


MACY11 30A(1052) 
TRAP TABLE 


ORTAB: 


000000 


ALUSUB: 


000000 


-_-—Oo-" Oo - Oo — 
MORI WMN WM UPS 


I 
11-SEP-79 


8 
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; OP8 
ANSE. -- ALSO NULL ENTRY FOR ORTAB 


:THIS TABLE OF 8 ENTRIES IS USED ri. THE ALU ‘‘OR"’ TEST IN THE 
;COMBINED INSTRUCTION EXERCISER TEST 


SRC OP1 
;DEST OP! 
NS 


3 ANS 
7SRC OP8 
=DST O 


TESTS 


;SRC OP! 
;DST OPI 
NS 


SRC OPS 
:DST OPS 


OP8 
;ANS8 -- ALSO NULL ENTRY FOR ALUSUB 


THIS TABLE OF 8 ENTRIES IS USED thy ALU SUB TEST IN THE 
; COMBINED INSTRUCTION EXERCISER 


SEQ 0306 
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063766 
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MmMUNMYUVINW" 


o-—--—-o0o—-o 
AOwUwUNUNOS 
MoPonoenrnrrr 


—o 
oo 
oo 
Ww 
oo 
Mmm 


OGIC TESTS MACY11 —_ 
9 13:31 TRAP TABL 


INSTAB: 


J 8 
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(R3),(R2) 
(R3),(R2) 
(R3),(R2) 
tO 
(R3),R 


R2 
R5,R2 


SEQ 0307 

7 ANSS 
SRC OP6 
:DST 0P6 
SRC OP7 
[DST OP7 
‘ANS? 
SRC OPS 
:DST OP8 

$8 


;BEGINNING OF INSTRUCTION TABLE OF INSTRUCTIONS 
; THAT TEST BUT SERVICE IN VARIOUS ROM LOCATIONS 
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CQKDAD.P11 11-SEP-79 13:3 TRAP TABLE SEQ 0508 


16568 063770 060302 ADD R3,R2 
16569 063772 010302 MOV R3_R2 
16570 063774 011302 MOV (R3) ,R2 
16571 063776 110302 MOVB = R3,, R2 
16572 064000 006102 ROL R2 
16573 064002 106102 ROLB = R2 
16574 064004 105402 NEGB = R2 
16575 064006 102400 BVS +2 
16576 064010 102000 BvC +2 
16577 064012 000005 RESET 
16578 064014 020302 CMP R3,R2 
16579 064016 030302 BIT R3,R2 
16580 064020 040302 BIC R3,R2 
16581 064022 120302 CMPB R32 
16582 064024 130302 BITB = R3.R2 
16583 064026 140302 BICB = R3..R2 
16584 030 150302 BISB R3.R2 
16586 064032 000000 DWTB: 0 ;ALSO SERVES AS INSTAB TABLE TERMINATOR 
16587 064034 000001 1 
16588 064036 000400 
16589 064060 177401 177401 
16590 064042 052526 2526 
16591 064044 125253 125253 
16592 3 MED TEST TABLES 
16593 
16594 064046 000000 TLOC1: .WORD 0 
16595 064050 000000 PSWHOL: .WORD 0 
16596 064052 000000 TABBEG: .WORD 0 
16597 064054 000000 TABEND: .WORD 0 
16598 064056 000040 STGBLK: .BLKW 40 
16599 064156 000000 VADR WORD 9 
064160 000000 PAI716: .WORD 0 
16601 064162 000000 PA1500: .WORD 0 
16602 064164 000000 TLOC2: .WORD 0 
16603 
16604 :* 
ore 38 TABLE 11 
16607 3 FOLLOWING IS A TABLE OF INTERNAL REGISTER OPERATION CODES 
16608 3* USED FOR TESTING THE MED INSTRUCTION. LABELS CORRESPOND 
16609 3* TO REGISTER NAMES, THE HIGH BYTE IS THE READ OPERATION 
16610 3* CODE, THE LOW BYTE THE WRITE CODE. 
16611 sf NOTE: WHEN ADDING OR DELETING 
16612 3* ENTRIES IN THIS TABLE, CHECK DUA 
16613 ;* ADDRESING TEST TO SEE THAT THE ‘ SCRATCH 
16614 :e PAD LIMITS’ ARE MAINTAINED. 
16615 ;* 
16616 
16617 064166 TBL2: 
16618 
1661? 064166 ASP1: 3A SCRATCH PAD = LO 
16620 164166 201 001 RIA: BYTE 201,001 sLOBYTE, HIBYTE=WRITE CODE, READ CODE 
16621 064170 202 002 R2A: "BYTE 202.002 
16622 066172 203 003 RBA: “BYTE 203,003 


16628 064174 204 004 RGA: BYTE 204.004 
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064210 


064340 
064342 


064342 - 


064 344 
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$ 
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0G 
9 


1¢ 
13: 


ON mee ot os 4 OO =n 
—ONOUEWN—OCuU 


TRAP 


FEA: 
BSP2: 
CSP1: 


LJAM: 
LSERV: 


* "BYTE 
FDSTO: 


-BYTE 
-BYTE 


© ROM PIPPIPINPIPI PIPPI PIPE PE PY POPE Po Puno nnns 
DWAWN AAA PMN OOOO OOO 
<=OVUFWNM—ONO WN ONO UIF WN OO wu 
WWANWAWWWA AIP PO PO POP © 2 tS SS OO 
AMF WN HO NAWN SOW UVF WN OCU 


—ds = es 8s 8s &© 8 © 8s &©& & & & & & © © © © & & & & 


MOoOOOCOCOCOCOOCOCOCOCOCOOCOOCOCoCOoOoCOoOCoCOoOSoCNe 


237,037 


277,077 


Lt 8 
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AP TABLE 


7A SCRATCH PAD-H] 


3B SCRATCH PAD - LO 


3B SCRATCH PAD - HI] 


3C SCRATCH PAD 


SEQ 0309 


a 8 
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CQKDA-D KD11-K BASIC LOGIC TESTS 
CQKDAD.P11 11-SEP-79 13:31 TRAP TABLE SEQ 0310 
1 064346 302 102 LPBA: -BYTE 302,102 

16681 064350 305 103 LCUA: -BYTE 303,103 

16682 064352 304 104 LFGIN: .BYTE 304,104 

1 3 064354 305 105 LWHAM: .BYTE 305,105 

16684 064356 307 107 LTAG: -BYTE 307,107 

16685 064360 310 110 CNSCO: .BYTE 310,110 

16686 064362 311 111 CNSC1: .BYTE 311,111 

16687 064364 312 112 CNSC2: .BYTE 312,112 

16688 044366 313 113 CST200: .BYTE 313,113 

16689 004370 316 116 CSP: CNSTO: .BYTE 316,116 

16690 064372 224 024 RT1A: -BYTE 224,024 

16691 064374 225 025 RT2A -BYTE 225,025 

16692 064376 26 RT1B: -BYTE 264,064 

16693 064400 265 065 RT2B: -BYTE 265,065 

16694 064402 000000 -wORD 0 

16695 

16696 :* 

16697 ;* TABLE 111 

! 16698 :f 

16699 3* THE FOLLOWING IS A LIST OF ‘“'NOP’’ OPERATION CODES 

16700 sf THAT WILL BE USED WITH A MED IN MED TEST 3 TO 

ga 7* ENSURE THAT A MED WITH THESE CODES WILL NOT HANG. 

6 

16703 064404 TBL3: 

16704 064404 120 137 NOPS: BYTE 120,137 ;GROUP A 

16705 064406 145 145 BYTE 145,145 ;GROUP B 

16706 064410 150 151 -BYTE 150,151 ;GROUP C 

16707 064412 156 177 BYTE 156,177 ;GROUP D 

16708 064414 320 343 -—BYTE 320,343 fewees E 

16709 064416 357 -BYTE 353,357 PG 

ort 064420 000000 WORD 0 + 1% TERMINATES TABLE 

6 

16712 3* 

16713 3* TABLE IV 

16714 3* 

16715 3* THE LIST BELOW CONTAINS THOSE OPERATION CODES 

16716 ;* CORRESPONDING TO THE INTERNAL REGISTERS WHICH MUST 

16717 3* BE TESTED SEPERATELY BECAUSE THEY ARE READ-ONLY, 

see :* WRITE-ONLY, OR USED IN MACRO CODE EXECUTION, ETC. .. 

1671 

16720 064422 TBL4: 

16721 064422 200 000 ROA: -BYTE 200,000 sLOBYTE ,HYBYTE - WRITE CODE, READ CODE 
16722 064424 207 007 R7A: BYTE 207,007 30 REPLACES ANY NON EXSISTENT CODES 
16723 064426 240 040 ROB: BYTE 240,040 sEXCEPT IN THE CASE OF ROA 

16724 064430 247 047 R7B: -BYTE 247,047 

16725 064432 314 4 CNST2 BYTE 314,114 

16726 064434 317 117 CNST1 BYTE 317,117 

16727 ye TABLE V 

16728 3% 

+44 44 0644 36 TBL5: 

16731 064436 306 LCDTA: .BYTE 306 sTHIS TABLE CONTAINS THE OPERATION 
16732 064437 106 BYTE 106 sCODES OF THOSE INTERNAL REGISTERS 
16733 064440 315 MD: BYTE 315 sWHICH MUST BE TESTED USING THE 
16734 064441 115 BYTE 115 sMICROBREAK REGISTER. THEIR 

16735 064442 267 CNSCTL: .BYTE 267 sASSOCIATED MICRO-ADDRESSES ARE IN 


CQKDA-D KDI1-K BASIC L 
CQKDAD.P11 


064536 
064536 


064556 


11-SEP-7 


003721 


000100 


000104 


0G 
9 


1¢ TESTS 
13:31 


077600 


050000 


n 8 
MACY11 350A(1052) 11-SEP-79 13:53 PAGE 312 


TRAP TABLE 
-BYTE 067 :THE NEXT TABLE 
JAM -BYTE 140 
SERV -BYTE 141 
PBA -BYTE 142 
CUA BYTE 143 
FLAG BYTE 344 
-BYTE 144 
DREG: -BYTE 345 
EV: .BYT 146 
SREG: -BYTE 346 
COUNT: .BYTE 147 
NUA: -—BYTE 347 
RES: -BYTE 351 
DCcSO0: BYTE 152 
-BYTE 352 zs INIT REG 
DCS! -BYTE 153 
-BYTF O ; TABLE TERMINATOR 
Even 
7f TABLE v1 
;* 
TBL6: 


ULCDTA: .WORD 3330 sTHIS TABLE CONTAINS THE MICRO-ADDRESSES 
~ WORD 3150 ;WHICH ARE LOADED INTO THE MICROBREAK 
UMD : ~ WORD 3375 sREG. TO TEST THE OPERATION CODES 
~ WORD 3271 sCONTAINED IN THE PRECEEDING TABLE. 
UCNSCTL: .WORD 3240 
-WORD 3224 
UJAM: WORD 3160 
USERV: .WORD 3161 
UPBA: WORD 3170 
UCUA: ~ WORD 3171 
UFLAG - WORD 3344 
~ WORD 3320 
UDREG: .WORD 3345 
UREV: WORD 3340 
USREG: .WORD 3350 
UCOUNT: .WORD 3341 
UNUA: WORD 3351 
URES: -WORD 3355 
UDCSO: .WORD 3720 
UINIT: .WORD 3724 
UDCS1: .WORD 3721 
3* TABLE v1l 
*® 
je THIS TABLE HOLDS THE OPERATION CODES AND THE CONSTANT 
is ? VALUE EXPECTED FOR CERTAIN INTERNAL REGISTERS. 
L7s: 
CLJAM WORD 7600 


CLCUA: WORD 
CLFGIN: .WORD 


SEQ 0311 
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CQKDA-D KDI1-K BASIC Locie TESTS PMACY11 3OA(1052) 11-SEP-79 13:53 PAGE 313 
CQKDAD.P11 11-SEP-79 13:31 TRAP TABLE SEQ 0312 
16792 064562 000105 054000 CLWHAM: .WORD 105,54000 

167935 064566 000107 Pes0ne CLTAG: .WORD 107,24000 

16794 066572 000110 177400 CCNSCO: .wORD 110,177400 
16795 064576 000111 177600 CCNSC1: .wORD 111,177600 
16796 064602 oo SRY 100000 CCNSC2: .wORD 112,100000 
16797 064606 000115 000200 CCST200:.WwORD 113,200 

16798 064612 000114 002 CCNST2: .WORD 114,2 

16799 064616 000116 000000 CCNSTO: .WORD 116,0 

16800 064622 000117 000001 CCNST1: .WORD 117,11 

16801 064626 000000 -wORD 0 

16802 

16803 EVEN 

16804 064630 DBTA: 

16805 064630 000 377 252. .BYTE 000,377,252,125 

16806 064633 125 

16807 064634 OBTB: 

16808 064634 000 001 120 .BYTE 000,001,120,253 

16809 064637 253 

16810 

16811 ;MESSAGE TABLES 

16812 

16813 064640 EM] 

16814 064640 EM2: 

16815 064640 027523 020102 051504 EMA: ASCII ‘S/B DST ° 
16816 064646 020124 

16817 064650 040527 020123 051504 €EM7: ASCII ‘WAS DST ' 
16818 064656 020124 

16819 660 042040 051505 004524 EM6: ASCII * DEST’ <HT> 
16820 666 024040 051111 004451 EMS: SASCIZ) «" CIR) "<HT>" TEST*<HT>® (PC)"<HT>" (SP)*<HT>"(PSW)° 


064 
16821 064674 052040 051 


505 004524 

16822 064702 024040 041520 004451 

3 064710 024040 050123 004451 
16824 064716 05 053523 000051 
16825 064724 027523 020102 042522 EMI0: ASCI2) «6'S/B RES WAS RES DST OP SRC OP TEST'<HT>" (PC)"<HT>* (SP)*<HT>" (PS) " 
16826 064732 020123 040527 020123 
16827 064740 042522 020123 051504 
16828 064746 020124 050117 020040 
16829 064754 051123 020103 050117 
16830 064762 0040 042524 052123 
16831 064770 020011 050050 024503 
16832 064776 020011 051450 024520 
16833 065004 024011 051520 024527 
16834 065012 000 
16835 5013 123 061057 051440 €EM3: LASCIZ) «6'S/B SP°<HT>"WAS SP'<HT>" CIR) '<HT>* TEST*<HT>® (°C) *<HT>* (PSwW)" 
16836 065020 004520 040527 020123 
16837 065026 050123 020011 044450 
16838 034 024522 020011 042524 
16839 5042 052123 020011 050050 
16840 065050 024503 024011 051520 
16841 065056 024527 000 
16842 065061 011 020011 051511 Dn2: .ASCIZ) <HT><HT>' IS R3° 
16843 065066 051040 000063 
16844 065072 004411 044440 020123 ODH4: ASCIZ) <HT><HT>' IS RS" 
16845 065100 032522 00 
16846 065103 015 0424612 042116 EOPI: wASCIZ <15><12>"END PASS @# ° 
16847 065110 050040 051501 020123 





¢ 9 wrrg 
MACY11 30A(1052) 11-SEP-79 13:53 PAGE 314 4) 
AP TABLE SEQ 0313 


CQKDA-D KDI1-K BASIC bolt +s 


CQKDAD.P11 11-SEP- 


16848 065116 020043 
16849 065121 011 
16850 26 020 
16851 06 
16852 06 

06 

06 


33 
-_—n 
nw 

— 

un” 


EOP2: .ASCIZ <WT>"ERROR COUNT = ' 


—nrwr 
So 
= New 
yo > 
=— NE ae wm 
Mmwwuw" 


Ny NRONSGC 
- UNwe 
a 


IDENT1: .ASCIZ <15><12>"CQrDADO KDI1-K BASIC LOGIC TESTS*<1S><12> 


ooooo 
*- 
Sanu 


1685 
16854 0 
16855 065162 040 
16856 047 
16857 065176 042 
16858 065204 0000 
16859 065206 


FF 
3S 


050101 BEMSG: .ASCIZ <CR><LF>"TRAPPED TO 4 PC = ° 
a 020103 
052012 040522 RSMSG: .ASCIZ <CR><LF>'TRAPPED TO 10 PC = ° 


000 
065261 1246 051505 0515246 EM11: .ASCIZ ‘TESTS SKIPPED’ 
065266 051440 044513 050120 
042105 000 


065277 040 050040 004503 DH11: .ASCIZ °' PC'<HT>’EXPCTD'’<HT>"ACTUAL’’<HT>’( TEST @°S)" 


SEEEEEPERES 
seeeee3e 


——» 
~ 
Nw 
w 
uw 
— 
~ 
oo 
ru 
ox 
rr 
-—o 
—uw 
oo 
ws 
N— 
_—w 
orm 
Wo 
oo 
ar 
or 
we 
rr 
iw 


065326 in 023443 024525 
065335 115 042105 0462060 EM12: .ASCIZ /MED DID NOT ABORT IN USER MODE/ 
065342 52 


— —2 —s 
Op oo Oo 
ee be be be be) 
NOW EW 
Ss 
w 
w 
w 
*- 


16880 065364 051105 046440 042 


7 
2 
5 
7 
16882 065374 042515 020106 054105 EMI3: .ASCIZ /MED EXECUTED IN USER MODE/ 
16883 065402 041505 052125 042105 
16884 0654610 044440 020116 051525 
16885 065416 051105 046440 042117 
16886 065424 000105 
16887 065426 042515 020104 044103 EM14: .ASCIZ /MED CHANGED PSW/ 
16888 065434 047101 042507 020104 
16889 065442 051520 000127 
16890 065446 044515 051103 061117 EMI5:  .ASCIZ /MICROBREAK TRAP-TO-4 DID NOT OCCUR/ 
16891 065454 042522 045501 052040 
16892 065462 040522 026520 047524 
16893 065470 032055 042040 042111 
16894 065476 047060 052117 047440 
16895 065504 041505 051125 000 
16896 065511 116 043517 052503 EMI7: .ASCIZ /LOGCUA LOGGED WRONG/ 
16897 065516 020101 047514 043507 
16898 065524 042105 053440 047522 
16899 065532 043516 000 
6900 065535 103 050123 041440 EM21: .ASCIZ /CSP CONSTANT WRONG/ 
16901 065542 047117 052123 047101 
16902 065550 020124 051127 047117 
16905 065556 000107 
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CQKDA=D KDi1-K BASIC Locle TESTS MACY11 SOAC(1052) 11-SEP-79 13:53 PAGE 315 
CQKDAD.P11 11-SEP-79 15:31 TRAP TABLE SEQ 03514 
6 065 040502 020104 040504 EM22: .ASCIZ /BAD DATA READ BY A MED/ 
16905 0655 040524 051040 040505 
16906 065574 020104 054502 040440 
16907 065602 046440 042105 000 
16908 065607 116 020117 042117 EM23: .ASCIZ /NO ODD PC TRAP/ 
16909 065614 020104 041520 052040 
16910 065622 040522 000120 
16911 065626 042117 020106 042101 EM24: -ASCIZ /O0DD ADR. BIT NOT SET IN CPU ERR REG OR LOG JAM/ 
16912 0656 027122 0410460 052111 
16915 065642 0467060 052117 051440 
16914 065650 052105 044440 020116 
16915 065656 050103 020125 051105 
16916 065 020122 042522 020107 
16917 065672 051117 6040 043517 
16918 0657 045040 046501 000 
16919 065705 120 054510 020123 EM26: .ASCIZ /PHYS BA LOGGED WRONG/ 
16920 065712 040502 046040 ot tt 


16923 065732 040503 044103 020105 EM27: .ASCIZ /CACHE PARITY ERROR LOGGED IN BAKUP MODE/ 


17 0001 
16930 066002 040503 044103 020105 EM30: .ASCIZ /CACHE PARITY TRAPPED WHEN DISABLED/ 


000 
16936 066045 111 051516 051126 EM41: eASCIZ = /INSTR. NOT ABORTED IN CACHE ABORT MODE/ 


— 
o 
»?) 
ww 
oO 
So 
~™ 
=] 
— 
So 
* 
J 
rx 
~ 


046440 
054522 EM32: -ASCIZ /MEMORY ERR REG INCORRECT/ 


~“ 
on f£ Ooms 


EMS: -ASCIZ /TIMEOUT BIT NOT SET IN CPU ERR REG OR LOG JAM/ 


? 
fiiitiisesett a3 


TOR ee se 
sore oct SSNsok 

So 

7 

o 

w 

2 

—s 

oOo 

= 

~ 

w 

So 

w 


— 

o 

oO 

w 

w 

ft 

Coons 
So 
w 
— 
—_— 
— 
~ 
So 
oa 
o 
So 
ya 
So 
So 
= 


EM34: eASCIZ /NO ILLEGAL INTERNAL ADR TRAP/ 


—— 
oo 
oo 
ww 
no 
Morr 
Le) 
ow 
oS 
v3 
~ 
w 
So 
~ 
So 
a 
—s 
~N 
oS 
S 
—NOOC Wo 


1 
1 
16959 066244 046101 040440 05 





—E 9 
COKDASD KDII“K BASIC LOGIC TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 316 
CQKDAD.P11 11-SEP-79 13:31 TRAP TABLE SEQ 0315 
16960 066252 052060 040522 000120 
16961 066260 047111 051126 040516 €EM35: eASCIZ /INTRNAL ADR ERR BIT NOT SET IN CPU ERR REG OR LOG JAM/ 
16962 066266 020114 042101 020122 
16963 066274 051105 020122 044502 
16964 066302 020124 047516 020124 
16965 066310 042523 020126 047111 
16966 066316 041440 052520 042440 
16967 066324 051122 051040 043505 
16968 066352 047440 020122 047514 
16969 066360 020107 040512 00011 
16970 066 040514 052125 044440 EM3e: «ASCIZ “"LAST INTR/TRAP VECTOR NOT LOGGED IN FLAG REG’ 
16971 066354 052116 027522 051124 
16972 066362 050101 053040 041505 
16973 066370 047526 020122 047516 
16974 066376 020126 047514 043507 
16975 066404 042105 044440 020116 
16976 066412 046106 043501 051040 
16977 066420 043505 000 
16978 066425 114 063517 0430460 €EM37: eASCIZ /LOG FIRST MODE DID NOT INHIBIT ERROR LOG AFTER FIRST ERROR/ 
16979 066630 051111 052123 046440 
16980 066436 042117 020105 044504 
16981 066444 020104 047516 020124 
16982 066452 947111 044510 044502 
16983 066660 020126 051105 047522 
16984 066466 020122 047514 020107 
16985 066474 043101 042524 020122 
16986 066502 044506 051522 020124 
16987 066510 051105 047522 000122 
16988 066516 051105 047522 020122 EM40: -ASCIZ /ERROR LOG WAS NOT REENABLED, ODD ADR BIT CLR IN CPUERR/ 
16989 066524 047514 020107 040527 
16990 066532 020123 047516 020124 
16991 066540 042522 047105 041101 


16996 066576 050103 042525 051122 
066604 000 
16998 066605 116 020117 040505 EM31: .ASCIZ /NO CACHE PARITY TRAP/ 
16999 066612 044103 020105 040520 
1 22 054524 052040 


17002 eeeece 047514 023040 044040 EM42: .ASCIZ /LO & HI BYTE & TAG PARITY BITS NOT SET IN LOG SERVICE/ 


NNN 
S3S33P 
eonouw 
So 
~ 
i=] 
—, 
i) 
— 
o 
= 
* 
w 
So 
~ 


EM43: -ASCIZ) /LO & HI BYTE & TAG PARITY BITS NOT SET IN MEM ERR REG/ 


ee ig ee et et et et 
oo 


WFwun—o 

So 

a 

o 

~ 

w 

Poa 

oo oS 
NmuMNew 
uw 

So 

S 

So 

So 

w 

™ 

oS 

+S 

o 

Oo 

7 

w 


~ 
oooo 
Oe et es ee 


“NN 


066750 020131 044502 051 
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CQKDA-D KD11-K BASIC bets 
9 TRAP 1 SEQ 0316 


CQKDAD.P11 11-SEP- 


EM45: .ASCIZ /CACHE TAG LOGGED WRONG/ 


S L2SF 


EMEIS1: .ASCIZ ‘EIS SET COND COVES WRONG 


0 

6 

5 

7 

5 

4 

3 

: EM16: -ASCIZ /CACHE DATA LOGGED WRONG/ 
5 

6 

0 

7 

4 

7 

; EMEIS2: .ASCIZ ‘EIS GAVE WRONG RESULT’ 

5 


047524 044455 EM46: -ASCIZ ‘AUTO-INCREMENT (DECREMT) DID NOT OCCUR IN EIS* 


94h 3h, 051125 044440 020116 
067222 050040 053523 051011 DHEIS1: .ASCI1 ° PSW'<HT>"REG-WAS-REG*1'<HT>'REG-S/B-REG+1'<HT> 


. 067252 041057 rt 043505 
052 067263 040 050040 004503 DH46: .ASCIZ * PC'<HT>* C(IR)"<HT>* TEST" 


304 020040 041520 046411 DH15: eASCIZ / PC/<HT>/MEDCODE MICROBK REG./ 


0 
26 potte'y4 051040 045505 
36 0200460 041520 066411 DHI7: .ASCIZ / PC/<HT>/MEDCODE EXPECTD RECEIVD/ 


000 
373 040 050040 000103 DH23: .ASCIZ 
400 0200460 041520 041411 DH24:  .ASCIZ 


068 067414 047514 045107 046501 


070 067425 040 050040 004503 DH25: .ASCIZ / PC/<HT>/FLGREG/ 
7071 667430 046106 051107 043505 


PC/ 
PC/<HT>/CPUERR/<HT>/LOGJAM/ 


™ 
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CQKDA-D KDI1-K BASIC LOGI¢ TESTS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 318 
CQKDAD.P11 11-SEP-79 13:31 TRAP TABLE SEQ 0317 
17072 067436 

17073 067437 040 050040 004503 DH26: eASCIZ 3") PC'<HT>'<17:16>-S/B PA=-<15:0> <17:16>-WAS PA-<15:0>° 
17074 067444 030474 035067 033061 

17075 067452 026476 027523 020102 

17076 067460 040520 036055 032461 

17077 067466 030072 020076 036040 

17078 067474 033461 030472 037066 

17079 067502 053455 051501 050040 

17080 067510 026501 030474 035065 

17081 067516 037060 000 

17082 067521 040 050040 004503 DHn27: eASCIZ) / = PC/<HT>/LOGPBA/<HT>/LOGDATA/<HT>/LOGTAG/ 
17083 067526 047514 050107 040502 

17084 067534 046011 043517 040504 

17085 067542 040524 046011 043517 

17086 067550 040524 000107 

17087 067554 02 0 041520 046411 DH32: eASCIZ / PC/<HT>/MEMERR/ 

17088 067562 046505 051105 000122 

17089 067570 020040 041520 046011 ODn42: .ASCIZ / PC/<HT>/LOGSERVCE/ 

17090 067576 043517 042525 053122 

17091 067604 042503 000 

17092 067607 040 050040 004503 DH44: SASCIZ / = PC/<HT>/EXPCT/<HT>/RECVD/ 
17093 067614 054105 041520 004524 

fA da 067622 042522 053103 000104 ene 

. Vv 

17096 067630 001016 0U1076 001100 0DT15: «WORD SERRPC,STMPO,STMP1.0 

17097 067636 000000 

17098 067640 001016 001100 001102 ODT21: ~ WORD SERRPC,STMP1,STMP2,$REG0,0 

17099 7646 001062 000000 ‘ 

17100 067652 001016 001100 001102 ODT22: .WORD SERRPC,STMP1,STMP2,STMP3,0 

17101 067660 001104 000000 

17102 7 001016 000000 D123: -WORD  SERRPC,O 

17103 067670 001016 001064 001062 ODT24: WORD SERRPC ,SREG1,SREGO,0 

17104 067676 000000 

17105 77 001016 001062 000000 odT25: .WORD SERRPC,S$REGO,0 

17106 067706 001016 001064 001066 DT26: WORD SERRPC, SREG1, SREG2,$REGO,$REG3,0 
17107 067714 001062 001070 000000 

17108 067722 001016 001070 001064 0127: «WORD SERRPC,SREG3,SREC1,$REG2,0 

17109 067730 001066 000000 

17110 067734 001060 001066 001070 ODTEIS1: .WORD SREGAD , SREG2, SREG3,S$REGI,SREGS 
17111 067742 001064 001072 

17112 067746 001016 001076 001062 DT46: -WORD SERRPC,STMPO,S$REGO,0 

ite 067754 000000 

17115 067756 000 000 DF1S: -BYTE 0,0 

17116 067760 000 000 000 ODFI?: -BYTE 0.0,0 

17117 067764 eEVEN 

17118 067764 DT1 

17119 067764 DT2 

17120 067764 DT4: 

17121 067764 001072 D110: WORD SREG4 

3s Sts See ABB 

6 H e 

17124 067772 Bp loee oo ges Beas D5: ~ WORD $REG1,$REGO, SERRPC .SREGS,SREGAD,0 
17125 070000 001074 106 

17126 070006 001072 001070 001064 DT3: WORD $REG4,SREGS,SREGI.SREGO,SERRPC,SREGAD ,0 
17127 070014 001062 001016 001060 





CQKDA=D KD11-K 
CQKDAD.P11 


17128 070022 


000000 
17129 070024 001016 001124 001062 DT11: 
000000 


17130 070032 
17131 


BASIC LOGIC 
11-SEP-79 1 


a | 
3:3 


ESTS 
1 


MACY11 30A(1052) 


TRAP TABLE 


- END 


- WORD 


4 9 
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SERRPC ,STESTN, SREGO,0 


SEQ 


takicaiel 
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CQKDA-D KD11-K BASIC LOGIC TE 
CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0319 
ABASE = 000000 930 

ACDW1 = 000000 930 

ACDW2 = 000000 930 

ACPUOP= 000000 930 945 
ADDWO = 000000 930 

ADDW! = 000000 930 

ADDW10= 000000 930 

ADDW11= 000000 930 

ADDWI2= 000000 930 

ADDW13= 000000 930 

ADDW14= 000000 930 

ADDW15= 000000 930 

ADDW2 = 000000 930 

ADDWS = 000000 930 

ADDW4 = 000000 930 

ADDWS = 000000 930 

ADDW6 = 000000 930 

ADDW7 = 000000 930 

ADDWS8 = 000000 930 

ADDW9 = 000000 930 

ADEVCT= 000000 930 936 
ADEVM = 000000 9 

AENV = 000000 930 941 
AENVM = 000000 930 942 
AFATAL= 000000 930 93 
ALUADD 063334 14004 14009 16409" 
ALUSUB 063554 14064 14069 164934 
AMADRI= 000 930 

AMADR2= 000000 930 

AMADR3= 000 930 

AMADR4= 000000 930 

AMAMS1= 0000 930 

AMAMS2= 00 930 

AMAMS3= 000000 930 

AMAMSG= 00 930 

AMSGAD= 000000 930 938 
AMSGLG= 000000 930 939 
AMSGTY= 000000 930 932 
AMTYP1= 000000 9 

AMTYP2= 000 930 

AMTYP3= 000 930 

AMTYP4= 000000 930 

ANDTAB 063414 14124 14129 164378 
APASS = 000000 930 935 


0 
6147 163314 
ret 16140 16287 163298 
6 


3280 
142 16289 163308 : 
66198 


ATA 063276 2638 2688 2700 2716 2748 2761 2809 0 2849 2861 2871 2883 2894 
3 7726 7738 7751 7770 7791 
7935 7949 7978 8007 8008 


8769 8781 8821 8833 8868 
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CQKDA-D KDI1-K BASIC LOGIC TE 

CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 03520 
9093 9107 9130 9144 9245 9259 9282 9296 9383 9415 9487 9529 9764 
loses 9818 9823 9867 9932 11081 11126 11168 14406 14426 14478 14498 14545 

ATESTN= 000000 930 934 

AUNIT = 000000 930 937 

AUSWR = 000000 930 944 

AVECT1= 000000 930 

AVECT2= 930 

A 001636 12824 1286 

A015 002106 144 14538 

A017 002200 1491 14984 

A020 002246 1520 15254 

A021 002276 1542 15478 

A023 002364 1583 15884 

A032 002570 1688 16934 

A035 0026 1710 17154 

A034 002670 1731 17364 

A041 003034 1812 18178 

A046 003234 1910 19154 

BASIC 003246 1916 19248 

BEMSG 0652 15907 16859# 

BERFLG 063250 4465* 4471* 15898" 163808 

8 061220 4503 12332 12316 13180 13218 13257 13274 13326 13386 13424 13455 13487 14914 
15141 15167 15333 15363 15411 15539 15586 15617 15633 15652 15667 159018 

BETST 061212 4462 15898" 

B1TO0 = 009001 8124 1219 2294 15158 15415 15452 15533 15570 15607 15634 

B1100 = 000001 8024 812 

B1101 = 000002 8014 811 

B1T02 = 000004 8004 810 

B1T03 = 000010 7998 809 

B1104 = 000020 7988 80 

B1T0S5 = 000040 7978 07 

B1106 = 000100 7968 806 

B1T07 = 000200 795a 805 

B1T08 = 000400 7948 804 

B1T09 = 001000 7938 803 15961 16046 

BIT1 = 00000 8114 2955 15483 

B1T10 = 002000 792# 10023 

B1T11 = 004000 791# 10893 15039 15968 

BIT12 = 010000 790# 11705 

B1115 = 020000 7894 12759 15344 16031 

B1T14 = 040000 7884 13899 15943 

B1115 = 100000 787# 146850 15089 15116 15158 15177 15452 15493 15570 15600 15607 15845 

BIT2 = 000004 8104 3687 15177 15375 15600 

BITS = 000010 809# 4196 

B11T4 = 000020 B08# 4921 15337 15590 

BITS = 000040 8074" 1223 5794 15421 

B116 = 000100 8064 1218 1221 6646 15171 15367 15618 

B1T7 = 000200 8058 1220 1222 7502-15344 = 15520 

B1T8 = 000400 8048 8317 

B1T9 = 001000 803¢ 9238 15084 15135 15544 

BKFLAG 061112 15081* 15093 15115" 15123 15788" 157918 

BKROUT 061104 15079 157884 

BPTLOC 063254 94 2955 3687 4196 4921 5794 6646 7502 8317 9238 10023 10893 11705 
12759 =13899 14850 16375# 


BPTVEC= 000014 8198 


c 9 (ge 
STS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 323 | 
s€Q 0321 


CQKDA-D KD11-K BASIC Lol TE 

CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS 
BSP 064256 166494 

BSP2 06434 166754 

B1001 001630 12724 

B1002 0016 1272 12804 

B1003 001646 1282 12948 1301 

B1004 001662 1297 13074 1316 

B1005 0017 1312 13224 1331 

B1006 001716 1327 13378 8 1344 

81007 0017 1341 13504 1359 

B1010 001744 1355 1365@ 1374 

B1011 001762 1371 13808 1390 

B1012 002 1387 13964 1405 

B1013 002022 1402 14114 1422 

B1014 002 1419 14284 1437 

B1015 002070 1434 14434 381451 1458 
B1016 002116 1455 14644 1476 

B1017 002144 1472 146824 1496 1505 
B1020 002220 1500 1Si1#@ 361523 1529 
B1021 002256 1526 15358 1545 1552 
B1022 002310 1549 15584 1568 

B1023 002334 1565 15744 1586 1592 
B1024 002374 1589 15984 1607 

B1025 002420 1604 16134 1621 

B1026 002440 1618 16264 1634 

81027 002460 1631 16404 1648 

B1030 0025 1645 16544 1662 

B1031 002520 1659 16674 1675 

81032 002540 1672 16814 1691 1697 
81033 002600 1694 17034 81713 1719 
B1034 002640 1716 1724@ 1734 1740 
81035 002700 1737 1745#@ 1754 

81036 002720 1751 17598 1768 

81037 002740 1765 17734 = =1782 

B10460 002760 1779 17884 1799 

B1041 003006 1796 18044 1815 1821 
B1042 003044 1818 18274 1837 

B1043 003064 1834 18434 1854 

B1044 003106 1851 18604 

B1045 003134 1867 1870 1875a@ 1885 
B1046 §©003162 1882 18918 1913 1919 
CATERR 063252 15833 15835" 15849* 15901 15903* 15910" 1635814 
CCNSCO 064572 167948 

CCNSC1 064576 16795@ 

CCNSC2 064602 167964 

CCNSTO 064616 167994 

CCNST1 064622 168008 

CCNST2 064612 167984 

CCR = 177746 1217# 15222" 15224* 15274 15288 15290" 15405* 15406 15445* 154492 154651" 15455e 154708 
CCST20 064606 167974 

C1ITST 013412 4606 46184 

CLCUA 064552 167904 

CLFGIN 064556 167914 

CLJAM 64536 167874 

CLPBA 064546 167894 

CLSERV 064542 167884 


CLTAG 064566 167938 
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CQKDA-D KDI1-K ped LOGIC TE 
CQKDAD.P11 11-SEP-79 15:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0322 
CLWHAM 064562 167924 
CNSCDR 064234 166394 
CNSCTL 064442 16735a 
CNSCO }§ ©: 0064360 166854 
CNSC1 064362 166864 
CNSC2 064 166874 
CNSSW 064232 16638" 
CNSTSW 06423 166374 
CNSTO 064370 166894 
CNST1 064434 167268 
CNST2 064432 16725a 
COUNT 064455 167468 
CPUERR= 177766 1216@ 15170 15336 15366 15414 15589 15618 15626 
= 900015 727# 16186 16196 16859 16863 
CRLF = 000200 # 16157 16196 
CSP1 064342 166778 
CSP2 064370 166894 
CST200 4 166884 
CUA 064447 167408 
DBTA 064630 2767 3313 3325 3363 3375 3563 3571 9626 9646 9665 9676 9689 9700 
9714 9735 9762 9789 9816 9843 9865 11016 11036 11057 11079 11101 11123 
11145-11167) 11253 16395 =: 168048 
DBTB 064634 3338 3350 3388 3400 3439 3491 3652 3692 16396 168078 
DCcSsO 064460 167494 
ocS1 064462 167514 
DDISP = 177570 7348 
DF 15 067756 1038 8 17115# 
F17 067766 1065 1071 »=171164 
DHEIS1 067222 1194 1201 170464 
DH1 5277 1012 =16870" 
DH15 067304 1036 §=17055# 
DH17 067336 1063 1069 17060# 
DH2 065061 977 + =168424 
DH25 067373 1018 1024 1030 1075 1110 1117 1138 1173 —-17065# 
DH24 067400 1082 1131 1145 1159 1166 §=617066# 
DH25 067423 1152 =17070# 
DH26 067437 1096 §=17073# 
DH27 067521 1103 17082« 
DH32 067554 1124 1187 = 170878 
DH4 065072 987 168444 
DH42 067570 1180 17089# 
DH44 067607 1043 1050 1057 1089 §=17092# 
DH46 067263 1208 17052a 
DISPLA 001042 899# 15983* 16026 
DISPRE 000174 834" 
DPTRP = 000001 1219# 15224 15445 15455 15470 
DREG 064452 167434 
DSWR = 177570 733a 898 
DIEIS1 067734 1195 1202 171108 
D 067764 973 171184 
D110 067764 1008 171214 
D111 070024 1013. -17129# 
D115 067630 1037 =—17096# 
DT2 067764 978 171198 
D121 067640 1064 17098# 
D122 067652 1070 =617100# 


9 
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wo 
~~ 


C Te 
CQKDAD.P11 11-SEP- 3:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0525 
D123 067664 1019 1025 1031 1076 1111 1118 1139 1174 + =171028 
DI24 067670 1044 1051 1058 1083 1090 1132 1146 1160 167 =: 171038 
D125 067700 1125 1153 1181 1188 =. 171054 
D126 067706 1097 =: 171064 
D127 067722 11046 =: 171088 
D135 070006 983 17126# 
DT4 067764 988 171208 
DI46 067746 1209 «171128 
DTS 067772 171248 
D16 067770 998 171234 
DI7 067766 1003 =17122a 
DWTA 063322 2319 2321 2522 2568 2572 2591 2595 2640 2694 2712 2743 2803 2829 
2848 2877 2910 3163 3164 3175 3181 3200 3201 3202 3212 3218 3237 
3238 3239 3249 3255 3274 3275 3286 3292 3515 3527 3537 3549 6679 
7628 652 7676 7701 7725 7769 7790 7811 7832 7861 7890 7919 7948 
7977 8006 8035 8064 8086 8108 8130 8627 8890 8922 8953 8985 9018 
9055 9092 9129 916 9203 9244 9281 9318 9350 9382 9414 10502 10529 
10584 10611 10638 10664 10691 10746 10775 16393 16404# 
DWIB 064032 2544 2546 2900 3413 3465 3599 3607 3634 3670 8600 16394 165864 
EAO17 002166 1488 1489 1490 14934 
EA020 002242 1522a 
EAO21 002272 15448 
EA023 §=©002360 1580 1581 1582 15854 
EAO32 002564 16904 
EA033 002624 17120 


1 

EA041 003030 18148 

A 003230 19128 
EMEIS1 067065 1193 17029« 
EMEIS2 067116 1200 17034# 
EMTVEC= 000030 8224 

x 064640 971 168134 
EM10 064724 1006 16825# 
EM11 065261 1011 168674 
EMI2 065335 1017 + =16876# 
Em15 065374 1023 168824 
EM14 065426 1029 16887# 
EM15 065446 1035 16890# 
EM16 067035 1042 =17024# 
EM17 065511 1088 168964 
EM2 064640 976 168144 
EM21 065535 1062 169004 
EM22 065560 1068 169044 
EM25 065607 1074 169084 
EM24 065626 1081 169114 
EM26 065705 1056 1095 169198 
EM27 065732 1102 169234 
EMS 065013 981 16835é 
EM30 066002 1109 9169304 
EM31 066605 1116 §=©169984 
EM32 066114 1123. 169434 
EM35 066145 1130 169484 
EM34 066223 1137 = 169564 
EM35 066260 1144 169614 
EM36 066346 1151 169704 
EM37 066423 1158 16978# 
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TE 
CQKDAD.P11 11-SEP-7 31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0324 
ERG 664640 986 168154 
EM4O 066516 1165 169884 
EMG) 5 1172 = 169368 
ERG? 066632 1179 §=6170024 
ERGS 066720 1186) =: 170118 
ER4S 067006 1049 170208 
ER46 067144 1207 17038" 
ERS 064666 991 168208 
EM6 996 168198 
En? 1001 168174 
EOP) 065103 15699 168464 
EOP2 065121 15702 168494 
ERRA 06204 4420 160584 
ERRFLG 063240 4422* 4427 16058* 1635768 
ERRVEC= B15# 14901" 14914* 15948 15949" 15951" 15954¢ 
x 001640 12844 
£001 001632 12748 
£003 001656 1294 1295 1296 12998 
£004 001674 1309 1310 1311 13148 
£005 001712 1324 1325 1326 13298 
£006 001724 13434 
£007 001740 1357@ 
£010 001756 1370 13734 
£011 001776 1386 13894 
E012 002016 14044 
£013 002042 14214 
£014 002064 14368 . 
E016 002136 1469 1470 1471 ‘14748 
£022 002350 1562 1563 1564 15678 
E024 002414 16064 ] 
£025 002434 1617 16204 ' 
£026 002454 1630 1633a 
£027 002474 16478 
0 002514 16614 
£031 002534 16748 
£035 002714 17534 
0 002734 17678 
£037 002754 17818 
£040 003002 17988 
E042 306 18364 
£045 003102 18534 
E044 003130 18694 
03156 18844 
E1015A 002102 14504 
E2002 001644 12884 
£2015 002112 1457# 
E2017 002206 15024 
£2020 002252 15284 
£2021 002304 15514 
£2023 002370 15914 
£2032 002574 16964 
E2053 002634 17184 
£2034 002674 17398 
£2041 003040 1820# 
32 19184 


£2046 005242 
FACO.0 064324 166694 
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CQKDA-D KDII-K BASIC bolt Te 
CQKDad.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0325 
FACO.1 064 3 166708 
FACO.2 064 166714 
FACO.4 064332 ere 
FACO.S 064334 166734 
FAC1.0 064236 166408 
FACI.1 0646240 1664618 
eld 064242 166424 
FACI.3 064244 166434 
FACI.4 064246 166448 
FAC1.5 064250 166454 
FAC2.0 064272 166564 
FAC2.1 064274 166574 
FAC2.2 064276 166584 
FAC2.3 064300 166594 
FAC2.46 064302 166608 
FAC2.5 064304 166614 
FAC3.0 064202 166264 
FAC3.1 064204 166278 
FAC3.2 064206 166284 
FAC3.3 064210 166294 
FAC3.4 064212 166304 
FAC3.5 064214 166314 
FOST 064340 166754 
FOSTI 064254 166474 
FOST2 064310 166634 
FOSTS 064220 166334 
064336 166744 
FLAG 064450 167414 
FPSH] 064252 166468 
GNS = tteeer Y 833 16364 16365 16366 16367 
GNWHAM 064226 166364 
H] = 000200 12224 15483 15493 
HT = 000011 725#@ 16155 16196 16819 16820 16825 16835 16842 16844 16849 16870 17046 17052 
17055 17060 17066 17070 17073 17082 17087 17089 17092 
1B8uUF 063266 4578 4599 163918 
IDENT? 065141 4635 168524 
INCRSV 061202 15834 158494 
INIT 003262 1927@ 15715 15848 
INSTAP 063636 13855 165234 
1O0TVEC= 000020 8204 
1002 001642 1280 12864 
1004 001664 13094 
1005 001702 15244 
1006 001720 13398 
1007 001734 1353¢ 
1010 001750 13684 
1011 001766 13834 
1012 002006 13998 
1013 002030 14158 
1014 060 1432 
1015 02076 14468 
1016 002124 14674 
1017 002154 14864 
1020 002236 15188 
1021 002266 15408 
1022 002312 15604 
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CQKDA-D KDI1-K BASIC 


CQKDAD.P11 
1023 002346 
1024 0024 
1025 002422 
1026 002442 
1027 002466 
1030 25 
1031 002526 
1032 25 
1033 002620 
1034 2 
1035 002710 
1036 002730 
1037 002750 
1040 002772 
1041 003020 
1042 003052 
1043 003074 
10464 003120 
1045 003146 
1046 003212 
JAR 064444 
JMPS 041420 
JMPSA 041466 
LCDTA 0644 
LCUA 064350 
LF = 012 
LFGIN 064352 
LJAM 064 342 
LKCSR = 177546 
LO = 000100 
LPBA 064346 
LSERV 064344 
LTAG 064356 
LWHAM 064354 
MBUFO 063312 


fnu—o~ we 


708 


DONNA OOP OOOW 
Nmoew 
o 
cas 


oone = 
OCUANWwO 
zB BBB 


7 
10444 


29 
10473 


CROSS REFERENCE TABLE -- USER SYMBOLS 


114984 


16196 16859 16863 


12325 12343 12362 
15493 


2056 2058* 2117 
2259 2271 2275 
2651 2653 2670 
2911 2930" 2931 
3112 3113 3311 
3489 3492 3504 
4121" 4125 4482+ 
5184 5189 5202 
5737 5749 5767 
5911 5923 5941 
6844 6871 6897 
7194 7221 7378 
7505 7507 7527 
7831 7848 7860 
8066 8085 8088 
8710 8741 8755 
8984 9017 9033 
9317 9319 9349 
9712 9733 9748 
9951 9954 9973 
10744 10773 10802 


12392 


— 


12605 


WDWUDWUCYUINOW' 


MNIWON -DUYUWOS VWWHOOwWonw— 
MmNRIN—OWDOD OWN OF OWSFE O-—-WOOWwuw 


COO DO OOO NWA OUNE Wwe Pron 


Slr oo~7wovovou— 


— — 
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12636 


12667 


CONNORS 
* 


10300 
10926 


12698 


10956 


12729 


10358 
10986 


12764 


10387 
11034 


SEQ 0526 


12829 


dD 10 
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CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0327 
11077. 11099 )=—. 11102 ~—Ss«:11121 11143. 11146) 19965)=S11787 = 11208 ~=)=S— 11211 11230 3=—s:111251 11254 
12884" 12906* 12909 13860 13939 13945 14339 14370 14390 14407" 14442 144435 14462 
146479" 145146 14546" 16397 164004 
MBUF1 063316 2154 2173 2711 2716" 2929 3310 3335 3360 3385 7843¢ 7847 7872¢ 7876 
7901" 7905 7930" 7934 7959* 7963 7988* 7992 8017* 8021 8046" 8050 6 
8682 8712 9549 10556 10718 10804 10834 10864 10898 10928 1095 10988 12885¢ 
12915 12922 13154 13164 13193 13203 13861 13905* 13911 16398 164028 
*0 064440 167334 
MED = 076600 12128 13798 14905 14918 14949 14954 14957 14961 14995 15008 15037 15040 15048 
15082 15085 15087 15090 15101 15114 15117 15121 15133 15136 3=1513 15159 15168 
15183 15190 15202 15229 15231 15233 15238 152464 15250 15256 15262 15295 15300 
15334 15350 15364 15381 15412 154653 15459 15468 15480 15501 15512 15526 15534 
15540 15571 15587 15609 15624 15635 15653 15668 15748 
MEDHLT 055632 14920 14921 14922 149248 
MEDT! 055642 149418 
MEDTIO 056206 150424 
MEDT11 056260 150784 15140 
MEDTS 056042 14992a 
MEDTS 056100 150064 
REDO 055612 149178 
MED! 055514 148984 
MEMERR= 177744 12154 15303 15307 15492 
NOPS 064404 167044 
NUA 064456 167474 
OBUF 063256 4579 4600 163864 
ONCE 063254 1924* 1929 4631 4633* 163838 
ORTAB 063474 14184 14189 164654 
PABORT= 000200 12208 15445 
PA1S500 064162 166014 
PA1716 064160 166004 
064446 167394 
PIRQ = 177772 ] 
PIRQVE= 000240 8264 
PRIFLG 063236 1927 4398* 44607" 16113* 163758 
PRINA 062202 4400 161134 
PRO = 000000 7498 
PRI = 000040 750" 
PR2 = 000100 7514 
PRS = = 000140 7520 
PRG == 000200 7538 
PRS = 000240 7548 
PR6 = 000300 7554 
PR7 = 000340 7564 
PS = 177776 7298 730 
PSw = 177776 7304 1429 1443 1464 1482 1493 1502 1511 1560* 1574 1598 1602 1615 
1628 1681 1682* 1703 1704* 1724 1725* 1788 1804 1994* 2009* 2023 4223 
4231 4235" 4254* 4259 4263* 4277* 4285 4289* 4296 4303* 4338 4346 4350¢* 
4357* 64364* 4377* 4382 4385* 4636" 4678 4684 4698 4706 4720 4726 4740 
4748 12107 12114 1212 12144 3=3215t* 12159 1220 12211 12268 12271 12368" 12399* 
12614* 124625" 12431 12443 12446% 12658 12464 12476 12479* 12504" 12510" 12527 12534* 
12561" 12567* 12584 12591* 12610" 12625* 12641" 12656" 12672" 12687" 12703¢ 12718" 127348 
12749e 12769 12785* 12801" 12817" 12837* 12847" 12883* 12904" 12940" 14679* 14708 14709 
14899" 149172 14941" 15772* 
PSwHOL 064050 16595a@ 
PTRP1 057712 15456 15467# 
PwRUP 061054 15762 157714 


atte ay 
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PURVEC= 00002 
RCSR = 5 
ROBR = 


a 
~~ 
_~ 
oo 
Nor 


: 
BEEEEE EEE 


zDD 
Mm 
" 
=e 


@ 
MOWOS NNYN—T 


» 

“ 

m 

@ 

Po) 
Soe 
Ww 
Nee 


zz 
Ad 
< 
~™ 
~ 
a 
w 
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r~ 
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RSVTST 061114 
72 


ROA 06442 

ROB 064426 
RIA 064166 
R18 064256 
R2A 064170 
R2B 064260 
R3A 064172 
R3B 064262 
RGA 064174 
R4B 064264 
RSA 064176 
R58 064266 
ROA 064200 
R6B 064270 
R7A 064424 
R78 064430 


042764 
$OB2 043000 
$085 043156 
S0B4 043160 
$0B5 042772 
R 064454 


SREG 
STACK = 001000 


915: 


8404 
4453 


Oat a SS  OUIF FU 
oo 
-—o 
co 


—. ee ee 


15726 


15846 


158308 


167228 


1428 
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15727" 15736* 15742* 15757* 15758 
4575 


15088 = 15115 

15527 

15541 15654 15669 

15335 = 15365 »=. 15413 15588 =: 115625 
15251 15351 15502 

15481 

15513 

15134 

158484 15851 15905 15912 

14915* 


14915 158338 
15830* 163798 


15992" 163788 
15940 163778 


11975¢ 


1915 1931 14900 15771 


——— —-—— 4 
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CQKDA-D KD11-K BASIC LOGIC TE 

CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0329 

START 001630 837 12718 15773 

STGBLK 064056 165984 

STKLMAT= 177774 73\8 

$wB01 = 000971 12518 15078 15096 15100 

SwR 001040 R9B# 4628 4629 15734 15750" 15836 15845 15904 15936 15938 159435 15961 15968 
16031 16043 16046 

SWREG 000176 8354 

swO = 000001 7844 

sw0O = 000001 7748 784 

sw01 = 000002 7738 783 

Sw02 = 000004 7720 782 

sw0O3 = 000010 7714 781 

$w04 = 000020 7708 780 

swos = 0 7698 779 

$w06 = 000100 7684 778 

$w07 = 000200 7674 777 

$w08 = 000400 7664 776 

$wO9 = 001000 7654 775 

Swi = 000002 7834 

swi0 = 002000 7644 15936 

Swi1 = 004000 7634 

Swi2 = 010000 7624 4629 15836 815904 

swi3 = 020000 7614 

$w14 = 040000 7604 

swiS = 100000 7598 

Sw2 = 000004 7820 

sw3 = 000010 7814 

Sw4 = 000020 7804 

sw5 = 0000460 7794 

Sw6 = 000100 7784 

Sw7 == 000200 777" 

sw8 = 000400 7768 

Sw9 = 001000 775@ 

TABBEG 064052 165964 

TABEND 064054 165974 

TAG = 000040 1223@ 15483 15493 

TBITVE= 600014 8174 

TBL2 064166 14942 166174 

TBL3 064404 14992 167034 

TBL4 064422 167204 

TBLS 0644 36 18107 167294 

TBL6 064464 15108 16757" 

TBL7 064536 15044 16785# 

TBSER 061070 13843 157798 

TKVEC = 000060 824a 

TL0C1 064046 15220 15235 15286 15293 15447 15457 15503 15507 15515 165948 

TLOC2 064164 166024 

TPVEC = 00006 8254 

TRAPVE= 000034 8234 

TRIVEC= 000014 a 

TSET 052422 138434 

1S10 003316 19394 4637 

T$T1 003332 1944 1952@ 

TS110 §©003532 2047 20548 

7317100 007200 3225 3234a 

781101 007274 3262 32718 












CQKDA-D KDI1-K BASIC LOGIC 1 
CQKDAD.P11 11-SEP-79 15:3 
TST102 007366 3299 
TS1103 007446 3326 
TS1104 007526 3351 
TS1105 007606 3376 
181106 7 3401 
TST107 007744 3427 
TST11 003564 2063 
TST110 010022 3455 
TST111 010102 3479 
TSTI12 010162 3505 
TST115 0102246 3528 
TST114 010266 3550 
TST115 010356 35948 
TST116 010446 36308 
TST117 010510 3641 
TST12. 003622 2085 
TST120 010552 3659 
TST121 010614 3677 
TST122 010670 3699 
TST123 010714 3715 
TST124 010752 3743 
TS1125 010770 3757 
TST126 011004 3771 
TST127 011020 3785 
TST13. 003656 2107 
TST130 011040 3800 
TST131 011060 3815 
TST132 011076 3830 
TST1355) 011114 3844 
TST134 011132 3859 
TST135 011150 5874 
TST136 011175 3889 
TST137 011210 3904 
TSTi14, 003710 2125 

011230 3919 

011250 3934 

011264 3948 

011304 3963 

011324 3978 

011344 3993 

011362 

011 

003 

011 

011 

011 

011 

011 

011 

011 

011 

004 

012 

O12 

012 

O12 


-_—mn 
nw 
“ 
“ 
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CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0331 
TST164 012342 43318 
TST165 012464 4362 43718 
TS1166 012540 43948 
TSTle7 012620 4408 64168 
TST17 =.004054 2181 21898 
TS$1170 012664 4428 4435a 
TST171 012746 44598 
TST172 013016 4472 44808 
TST175 013116 45084 
TST174 013156 4518 45298 
181175 013210 4538 45478 
TST176 013244 4556 45734 
TS1177 013556 46454 
TST2 003350 1958 19664 
TST20 004110 2199 22068 
TS1T200 013600 4652 46598 : 
T$T201 013620 4666 46738 
TST202 013660 4686 46938 
T$T203 013722 4708 47154 
T$1204 013760 4728 47358 
TST205 014020 4750 47578 
TST206 014042 4764 47714 
TST207 014064 4779 47864 
TST21 004154 2221 22298 
TST210 014106 4794 4801" 
TST211 014130 4809 48168 
TST212 014154 4824 48314 
TST213 014176 4838 4845« 
TST214 014220 4853 48604 
TST215 014242 4868 48754 
TST216 014264 4883 48904 
TST217 014332 4909 49164 
TST22 004214 2244 22524 
TST220 014374 4930 4937a 
TST221 014442 4956 49634 
TST222 014474 4973 4980 
TST223 014622 5025 50320 
TST224 014656 5042 50494 
TST225 014726 5068 5075a@ 
TST226 014764 5086 50934 
TS$1227 015034 $112 51194 
TST23 004250 2261 22694 
TST230 015104 5138 51454 
TS7231 015234 5190 5197" 
T$T232 015310 5217 52248 
T$1233 015354 5243 5250" 
1$17234 015424 5269 52768 
T$7235 015472 5295 5302 
TS1236 015542 $322 5329" 
1$1237 015616 5349 5356" 
TS124 004310 2283 22918 
T$17240 015672 5376 53834 
781241 015744 5403 54104 
T$1242 016014 5429 54368 
781243 016062 5455 54624 
TS1244 016132 5481 54884 

| 

| 


CQKDA-D KD11-K BASIC 
CQKDAD.P11 
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COKDASD KDII=K BASIC LOGIC TESTS MACYI1 30A(1052)_ 11-SEP-79" 13:53 PAGE 335 
CQKDAD.P11 =-SEP-79 13:31 CROSS REFERENCE TABLE -= USER SYM ous SEQ 0333 
181326 022226 6832 68408 
$1327 022304 6859 68674 
$133 004 2429-24378 
1$1330 022356 6885 68934 
T$1331 022432 6912 69208 
$1332 022510 6939 69478 
1$1333 022562 6966 «= 69748 
1$1334 022640 6993 7001" 
$1335 022716 7020 ©7028 
1$1336 022770 7047 ©7055 
1$1337 023046 7074 7082" 
1$134 7 2450 24588 
1$1340 023122 7101 «= 7109 
1$1341 0232 7128 «= 7136 
TS1342 023254 7155 71638 
$1343 023332 71827190" 
1$1344 023410 7209-72178 
TST345 023464 7236 40-7244 
1S1346 023534 7263 = 7270 
$1347 023604 7289 72968 
1S135 736 2471 24788 
$1350 023654 7315 73220 
$1351 023724 7341 73488 
$1352 023774 736773748 
1$1353 024054 7393 74014 
TS1354 024124 7415 24238 
$1355 024200 7441 74498 
1$1356 024244 7462 74708 
1$1357 024324 7489 74978 
T$T36 004772 2491 2499" 
1$1360 024406 7515 75238 
$1361 024462 7541 = 7549" 
$1362 024526 7562 «= 7570 
$1363 024600 7590 = 75978 
TS1364 024654 7617 76248 
$1365 024722 7641 7648" 
1$1366 024770 7665 7672 
$1367 0250464 7690 7697 
1$137 005026 2512 25208 
$1370 025112 7714 = «77218 
1$1371 025166 7739 77468 
$1372 025226 7758 «= 7765 
1$1373 025272 7778 «= 77858 


T$1406 026344 8073 80814 





CQKDA-D KDI1-K BASIC LOGIC TE 
CQKDAD.P11 11-SEP-79 13:31 
TS1407 026416 8095 
S741 005132 2557 
TS1410 026466 8117 
TS1411 026536 8139 
TS1412 026602 8166 
TS1415 026652 8193 
TS1414 026726 8220 
TS1415 027002 8247 
TS1416 027056 8275 
TS1417 027136 8304 
TS142 = 005174 2580 
TS1420 027232 8337 
TS1421 027314 8366 
TS1422 027 8394 
TS1425 027434 8421 
TS1424 027510 8448 
TST425 027564 8475 
TS1426 027640 8502 
TS1427 027720 8530 
TS143 005236 2603 
TS1430 0 8559 
TS1431 03 8587 
T$1432 030132 8615 
T$1433 03020 8642 
TS1434 030260 8669 
TST435 030344 8698 
TS1436 030432 8729 
TS1437 030506 8756 
TS144 005274 26334 
TS1440 030564 8782 
TST441 030640 8808 
TS1442 030716 8834 
TS1443 030766 8854 
TST444 031036 8875 
TS1T445 031122 8906 
T$1446 031206 8938 
TS1447 031272 8970 
TST45 005322 2641 
T$1450 031356 9002 
TS1451 031452 9039 
TS1452 031546 9076 
TS14535 031644 9113 
TS1454 031742 9150 
TS1455 032036 9187 
T$1456 032132 9224 
TS1457 032242 9265 
TST46 =. 005364 2660 
TS1460 032340 9302 
1$1461 032430 9334 
T$1462 032520 9366 
TS1465 032610 9398 
1$1464 032700 9430 
1$1465 032740 9452 
781466 033000 9473 
T$1467 035042 9494 
TS147 ©=©005420 2678 


Ww 
— 
nm 
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STS MACY11 30A(1052) 11-SEP-79 13:53 PAGE 337 


CQKDA-D KD11-K BASIC LOGIC TE 
CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0335 
TS1470 033104 9515 95230 
T$1471 033146 9536 436-9545 
1$1472 033212 9558 9566 
T$1473 033266 9586 95934 
TS$1474 033336 9614 96218 
TS1475 033374 9634 9641" 
TS1476 033434 9653 96608 
1$1477 033502 9677 =: 96 B4a 
TSTS 003424 1999 2007 | 
TS150 005462 2701 2709" 
T$1500 033550 9701 9708" 
TS$1501 033614 9721 9729" 
T$1502 033672 9749 9756" 
1$1503 033752 9775 9783" 
1$1504 034030 9802 9810" 
T$1505 034110 9829 9837 
T$1506 034162 9851 9859" 
T$1507 034234 9873 9881" 
T$151 005520 2718 27268 
TST510 034302 9895 9903" 
TST511 034350 9917 9925" 
TST512 034420 9939 9947" 
TS1513 034470 9961 9969" 
TS1514 034542 99914" 
TS1T515 034616 10011 100184 
TST516 034676 10042 100494 
TS1517 034752 10069 100764 
TST52 005544 27418 

T$1520 035020 10096 101034 
1$1521 035076 10123 101314 
T$1522 035150 10151 10158# 
T$1523 035222 10178 10185# 
1$1524 035274 10205 10212# 
T$1525 035346 10231 10238 
1$1526 035430 10259  10267# 
1$1527 035504 10288 102964 
1S153 005600 2751 2759M 
1$1530 035566 10317 10325a 
1$1531 035642 10346 10354# 
1$1532 035724 10375 103834 
1$1533 036006 10404 10411" 
181534 036070 10432 10440 
181535 036150 10461 104694 
181536 036230 10489 10497 
1$1537 036304 10517 10524# 
1S154 005632 2768 27768 
1$1540 036354 10544 105514 
1$1541 036434 10572 10579# 
1$1542 036504 10599 106064 
1$1543 036556 10626 106334 
1$1544 036630 10653 10659 
181545 036702 10679 106864 
1$1546 036754 10706 107130 
181547 037032 10733 10740# 
1$155 005700 2793 = 28018 
181550 037114 10761 10769" 


mn 10 
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CQKDA-D KD11-K BASIC LOGIC TE 

CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0336 
$1551 037172 10790 107988 

T$1552 037260 10826 108288 

TS1553 037340 10850 108588 

TS1554 037426 10880 108884 

TS1555 037526 10914 109228 

TS1556 037612 10944 10952" 

TS1557 037676 10974 10982a 

TS156 ©. 005750 2818 28264 

TST560 037762 11003. «110114 

TST561 040020 11023. 11030" 

TST562 04 11043 110514 

TS15635 040132 11065 110734 

TST564 040202 11087 = 110954 

TS1565 040252 11109) «111178 

TS1566 040322 11131111394 

TST567 040374 11153) «111618 

TSTS7. 006010 2837 28458 

TST570 040446 11175111834 

TS1T571 040510 11196 =. 112044 

TSTS72 040560 11218 112264 

TS1573 040622 11239 112478 

TSTS7& 040672 11261 112694 

TST575 040732 11279) 11284 «112918 

TSTS76 040772 11301 = 11306) 113134 

TSTS77 041042 11323) 11333113408 

TST6 003444 2013 20214 

TST60 006 2862 28698 

TST600 041102 11350 §=6.11355 = s-11362" 

TST601 041160 11372-11382) 11385) =s-11394# 

TST602 041226 11404 11409 11412 114208 

TST605 041304 11430 §=11434 «11444114518 

TST604 041344 11461 11466 114738 

TST60S 041422 114683 =11493 «11496 =. 115034 

TST606 041470 11513) «11518 =611521) 115298 

TST607 041536 11539 11544-11547) )——-11555# 

TST61 006124 2884 28928 

TST610 041604 11565 11570 11573 115818 

TST611 041660 11591 11594 11599 11602 116114 

TST612 041734 11621 =11624 11629 11632 116414 

TST6135 042012 11057 9116694 

TST614 042100 117004 

TST615 042162 117294 

TST616 042232 11754a 

TST617 042310 11770): 117834 

TST62 006156 2901 29084 

TST620 042374 11799 =: 118164 

TST621 042456 11835 = =118484 

TST622 042542 11864 118814 

TST625 042622 11897 = 119098 

TS1624 042710 11926 =—:11943# 

TST625 042740 11951 = 119594 

TST626 043014 11977 11980 =: 11198 6# 

TST627 043050 11998  12005# 

1ST63 ©—006216 2918 29268 

TST6350 043104 12017 12024# 

TS1631 043140 12036 120434 
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1¢ TE 
CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0337 
TST632 043174 12055 120624 
TS1635 043276 12092 =121034 
TS1634 043402 12129 = 121408 
TS1635 043510 12166 86121778 
TS1636 043666 12193 12201) 9=—12213) 12222) «122378 
TST637 044044 12253 12261 3=12275 12282 ~—Ss«122978 
TST64 006274 2944 29528 
TST640 044126 123214 
TST641 044162 12331 123398 
TST642 044220 12349 123578 
TST6435 044332 123874 
TST644 044450 124194 
TS1645 044566 12452@ 
TST646 044702 124854 
TST647 045106 125428 
TST65 006 2972 29808 
TST650 045310 125998 
TS1651 045426 126304 
TST652 045544 126614 
TST6535 045662 126924 
TST654 046 127238 
TST655 046116 127548 
TS1656 046250 127908 
TST657 046370 12825¢ 
TST66 2990 29988 
TST660 046530 128708 
TS1661 047030 129538 
TST662 047076 129738 
TS1663 047232 1301 3a 
TS1664 047346 130514 
TS1665 047430 1350768 
TST666 047512 131014 
TST667 047574 131268 
TS167 44 3008 30164 
1TS1670 047660 13150¢ 
TST671 047766 13181 131898 
TS1672 050074 13219 =132278 
TS1T675 050234 13258 132798 
TST674 050416 13327 = 133394 
TS1675 050600 13387 133998 
TS1676 050674 134294 
TS1677 051000 134614 
1S17 003476 2031 20384 
TST70 0065 3026 3034a 
TST700 051104 1349354 
TST701 051164 135164 
TST702 051244 135398 
TST703 051524 135614 
TS1T704 051426 135944 
TS1T705 051530 13612 136294 
TS1706 051636 13647 136644 
TST707 051744 13682 136994 
TS171_ 006534 3043 30514 
TST710 052032 135725a ' 
181711 052120 13752a 
TST712 052206 137798 


ea. --- 
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CQKDAD.P11 11-SEP-79 15:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0338 
TST713 0523046 138098 

TST714 052436 138528 

TST715 052526 138798 

TST716 052556 138948 

TST717 052644 139198 

TS172 04 30758 

T$1720 052700 139358 

T$1721 052742 1359528 

TST722 053010 140014 

TST725 055074 140614 

TS1724 053160 141218 

TST725 053244 141818 

TS1726 053330 142278 

TST727 053404 14265 142718 
TST75 634 3083 3091" 
TS1730 053460 14289 143018 
TST731 053544 14324 1433518 
TST732 0536 14355 143624 
TS1733 055732 14391 143984 
T$S1734 054036 14627 = 144348 
TST735 054142 14463 9144708 
TST736 054246 14499 145068 
TS1737 054340 14530 14537« 


TST74 72 3101 3109" 

TST740 054422 14554 145614 

TST741 054506 14583 145908 

TST742 054574 14612 146198 

TS1745 054656 14641 146484 

TS1744 054730 146635 14674« 

TST745 055046 14706 147168 

TST746 055116 14734 147408 

TST747 055166 14759 = 14765# 

TST75 006734 3120 31288 

TS1T750 055236 14783 147898 

TS1751 055524 14811 148178 

TST752 055406 14840 148468 

TS1753 055506 14872 14895¢ 

TST754 055634 149384 

TST755 056034 149898 

TST756 056164 150334 

TST757 056252 15075¢ 

TST76 =. 007012 3152 31604 

TST760 056554 15153a 

T$1761 056732 152164 

TST762 057142 152834 

TST763 057274 15324a 

TS1764 057502 154008 

TST765 057600 154414 

1$1766 060160 155664 

TS1767 060402 156414 

TST77 = 007104 3188 31978 

TYPE = 104401 4403 4634 15699 15702 15705 15759 15838 15842 15906 16034 16069 16086 16088 
16091 16093 16097 16104 16160 16257 16564# 

TYPOC = 104402 15701 15706 15841 16077 16101 ‘16365#@ 

TYPON = 104404 163678 

TYPOS = 104403 163664 
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CQKDA-D KD11-K BASIC LOGIC TE 
CQKDAD.P11 11-SEP-79 15:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0339 
UBREAK= 177770 12146# 1932* 146898 15078 15112¢ 15142 
UCNSCT 0644674 167634 
UCOUNT 064522 167748 
UCUA 064506 167684 
UDCSO § 064530 167778 
UDCS1 064534 167798 
UDREG 064514 167718 
UFLAG 064510 167698 
VINIT 064532 167788 
UJAM 064500 167654 
ULCDTA 064464 167598 
UM = 140000 12134 
UMD 064470 167614 
A 064524 167758 
UPBA 064504 167678 
URES 064526 167768 
UREV 064516 167728 
UR6A 064216 166324 
UR6B 306 166624 
USERV 064502 167664 
USREG 064520 167738 
VAOR 064156 165998 
WCNSSW= 000226 1230# 15749 
WCSADR 064316 166664 
WCSA.0 064222 166344 
WCSA.1 064224 166354 
wCSB.0 064512 166644 
WCSB.1 064314 166654 
WRFLAG= 000344 12346# 15041 15091 15118 15137 
WRLCUA= 000305 12428 
WRLDAT= 000306 124684 15232 
WRLFGI= 000304 12448 
WRLJAM= 0005 12364 
WRLPBA= 000502 1240# 15230 
WRLSER= 000301 12384 
WRLTAG= 000307 1250# 15234 
WRLWHA= 000305 12464 
WRWHAM= 000222 1232@ 15086 15139 15160 15203 15454 15535 15572 15610 15636 
wwP == 000100 1218# 15222 15288 15290 15449 15451 
XCSR = 177564 1259# 4510 4531 4549 12624 12667* 124657 124680" 12491 12548 12796 12877 
XOBR = 177566 12604 


SAPTHD 000700 848 854" 


SASTAT= teeeee 16309 16324 

SATYC 062744 16280 162824 

$ATY1 062720 162784 

SATYS 062726 16145 16279" 

SATYS 062736 16039 162814 

SAUTOB 001034 8954 

SBDADR 001022 890" 

SBDDAT 001026 892" 

SCHARC 062466 16162" 16172" 16179 16188* 161938 

SCKSWR= eeeere VY 16370 

SCMTAG 001000 878" 

$cMi = 000006 9108 gil" 9120 9138 9148 9154 9168 
$CM2 = 000014 910" 911" 9120 9138 9148 9158 9lo# 
$cm$ = 000006 908" 910 
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CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0340 
$cA4 = 000005 9168 917" 9188 9198 9208 9218 
$c 001146 9454 
SCRLF 001115 9248 15705 15843 16034 16057 16069 16088 16093 16097 16161 16196 
SDEVCT 001130 9368 
AGN 060654 15695 15707 157134 
SENDAD 060644 7 157094 
SENDCT 156974 
SENULL 0 157168 
SENV 001140 9414 16036 16140 16287 #16311 
SENVA 001141 942 4626 16142 16147 #16289 
oP 060550 156884 
SEOPCT 060572 186944 15698 
SERFLG 001003 88148 15921 15957 15959 15965* 15991 16024* 16057 
SERMAX 001015 8874 15959 15982" 15991 
SERROR 061620 4620 15648 160114 
SERRPC 001016 8884 16028 16029" 16030 16057 16075 17096 17098 #$#+.+17100 17102 17103 17105 ~=#17106 
17108 17112 17124 17126 = =17129 
SERRTB 001150 9684 16083 
SERRTY 062046 16033 16068" 
SERTTL 001012 885# 1925* 15703 15844* 16027* 16057 
SESCAP 001112 9228 159322 15934* 15981" 16049 16051 16057 
SETABL 001140 9408 
SETEND 001150 860 952a 
SFATAL 001122 933@ 16315* 
SFFLG 063164 16278* 16281" 16309 16318" 163264 
SFILLC 001056 9064 16165 16196 
SFILLS 0010 9054 16196 
SGDADR 001020 889" 
SGDDAT 001024 8914 
$GE142 0634 157064 
SGTSWR= eeeeee 16369 
$HD © = 000000 
$H1BTS 000700 8554 
SICNT 001004 # 15972* 15973 15975* 15990 
SILLUP 061036 15726 15742 157644 
SINTAG 001035 CY] 
SITEMB 001014 8864 16030" 16038 16057 #16072 
$L 001116 925# 16057 16196 
SLFLG 063163 16319" 163254 
SLPADR 001006 3a = 4637" «89159638* 15979* 15984 15990 
SLPERR 001010 BB48 11646" 116746 11709* 11734* 11759" 11788 11821" 11853" 11886 11914" 12067* 12109* 
12146 12303" 12364* 123932 12490* 12547* 12604" 12635" 12666* 12697* 12728 12763" 12795¢ 
12831* 12875* 12958 131318 13498* 13521¢ i3544* 13566" 13706 13721" 13732 13747" 13759¢ 
13774* 13786% 13804" 13816* 1i3834* 13858 13874" 13903" 13957" 14005* 14027" 14065" 14087 
ais 14147* 16185* 14207 14233 142522 14277 14296 15109* 15140" 15963 15980" 15990 
1604 
SMAIL 001120 856 860 931# 15978 16036 16140 
SMBADR 000702 85604 
SMFLG 063162 16279* 16285 16320* 16324# 
SMSGAD 001134 16295* 16298 
SMSGLG 001136 9394 16300* 
SMSGTY 001120 # 16293 16301" 16313 163178 
Se’ Soisse | '5Sotn_ te” 10g 
NULL 
$nNwTST= 000001 19364 19498 1963@ 19758 19898 2004# 2018% 2035# 20518 2068 20908 2il2# 21308 
214684 21678 21868 22038 22268 22498 2266 22888 23148 2346468 23038 23818 23978 


fy KDI1-K pet 


U 
U 
U 
U 









0G] 
“79 1 


2548 
6454 
9778 


mu 
a 
w 


0 
1 
1 
1 
2 
2 
3 
3 
39168 
4 
4 
4 
5 
6 
6 
5 


oO 
— 


MOU NWwOUN@uU 
~o = 
oo 
J 


ed dd 
OOuwk &FWWWNN eS  OO°O 


15767a 
157264 


157428 
16057 


16013 
154468 


MACY11 30A(1052) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


oO 
~ 
—_ 


€ 11 
13:53 PAGE 343 


6668 


4498 


43s 


15970 


17103 


49a 
348 


WS & FWA OO 


17112 





CQKDA-D KD11-K BASIC 


Pe 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 








9841 


Wun &WWNN — — — O0O°O 
NOU —] NNW OUNO®uW" 
— BON OWUTM — WO Or 
FOWL MW —-WDYUwWWOnew 


ee ee eT Te) 
NO] NY VWOUN OW! 
— NWN WOOL F&F wwr 


wa | PTE oe pre 
MACYI1 3OA(1052) ‘1-SEP-79 13:53 PAGE 346 


CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0542 
17106 =: 117108 171246 =—-:17126 
17108 =17110 
17108 = 17110 17126 
17121 =—-:17126 
12189* 12197 12227 122469* 12257* 12269* 12287" 12988" 12996* 13005¢ 
13042* 15066 13116* 13292 15302 153512* 133522" 13352 15362¢ 13372¢ 
13416" 13420 13451¢ 13474e 134835* 160535* 17126 
15744* 15745* 
159298 
16012 16046 
709 710 712 713 714 715 716 921 922 925 
1968 1980 2009 2023 2040 2073 2095 2117 2135 
2191 2208 2254 2271 2295 2319 2349 2368 2386 2402 
2460 2480 2522 2544 2568 1 2614 2635 2651 2670 
2728 2743 2778 2803 2828 2847 2871 2894 2910 2928 
3000 3018 3053 3077 3093 3111 3130 3162 3199 3236 
3335 3360 3411 3437 3463 3489 3515 3537 3560 3596 
3668 3686 3725 3753 3767 3781 3795 3810 3825 3840 
3884 3899 3929 3944 3958 3973 3988 4003 4018 4032 
4077 4103 4138 4174 4195 4219 4250 4272 4312 4333 
4418 4437 4482 4510 4531 4549 4575 4649 4663 4677 
4739 4761 4790 4805 4820 4835 4849 4864 4879 4894 
4967 4984 5053 5079 5097 5123 5149 5201 5228 5254 
5333 5360 5414 5440 5466 5492 5518 5544 5570 5597 
5681 5709 5767 5793 5828 5854 5885 5911 5941 5966 
6045 6070 6122 6148 6174 6200 6226 6251 6277 6305 
6380 6406 6458 6484 6510 6536 6562 6588 6616 6645 
6736 6763 6817 6844 6871 6897 6924 6951 6978 7005 
7086 7113 7167 7194 7221 7248 7274 7300 7326 7352 
7427 7453 7501 7527 7553 7574 7601 7628 7652 7676 
7750 7769 7810 7831 7860 7889 7918 7947 7976 8005 
8085 8107 8151 8177 8204 8231 8258 8287 8316 8349 
8432 8459 8513 8542 8571 8599 8626 8655 8680 8710 
8793 8819 8866 8887 8919 8951 8983 9015 9052 9089 
9200 923? 9315 9347 9379 9411 9443 9464 9485 9506 
9570 9597 9645 9664 9688 9712 9733 9760 9787 9814 
9885 9907 9951 9973 9995 10022 10053 10080 10107 10135 
10216 §=10242 1 10300 10329 10358 10387 10415 10444 10473 10501 
10583 10610 1 10663 10690 10717 10744 10773 19802 10832 10862 
10956 10986 1 11034 «11055 11077) 11099) 11921) 19963-11165 «1:1:18? 
11251 «112751 11317) 11346-11366) 11398) = 1142411655) 11677 )—-:11507 
11585 11615) #1 11673) «11706 = 11733)«-11758) = 11787) -11820)S11852 S118 85 
11962 11990 1 12028 12046 12066 12107 12144 12181 12241 12301 
12361 12391 | 1 124656 12489 12546 12603 12634 12665 12696 1272? 
12829 12874 «(1 12977, 13017-13055) 13080) )=s «413105 13130) 13154) 13193 
13343 134031 13465 13497 13520 13543 13565 13598 13633 13668 
13755 137821 13854 138835 13898 13925 13939 13956 14004 14064 
14230 14274 1 14334 14365 14401 14437 146473 14509 14540 14564 
14651 14678 1 146744 14769 14792 14820 14849 14898 14941 14992 
15156 15219 1 15327 15403 15444 15569 15644 15685 15690 15708 
15763 15922 1 15926 15925 15926 15943 15955 15957 15958 15959 
| 
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CQKDAD.P11 11-SEP-79 15:51 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0344 
48358 4838 4842 4847 48498 4853 4857 4862 48648 4868 4872 4877 48798 
4883 4887 4892 48948 4909 4913 4918 49208 4930 4934 4939 69418 4956 
4960 4965 49678 = 4973 4977 4982 49848 5025 5029 5034 5036# 5042 046 
5051 50534 068 5072 5077 50798 5086 5090 095 50978 5112 5116 5121 
51238 5138 5142 5147 51498 5190 5194 5199 52018 217 5221 5226 52288 
5243 5247 5252 52548 5269 5273 5278 52808 5295 5299 5304 53064 322 
5326 5331 53330 349 5353 5358 536008 5376 5380 5385 5387#@ 5403 5407 
5412 5414# 5429 5433 5438 54408 5455 5459 5464 54668 5481 5485 5490 
54928 5507 5511 5516 5518# 5533 5537 5542 55448 5559 5563 5568 55708 
5586 5590 5595 55978 5613 5618 5625 56258 5641 5646 651 56538 5669 
5674 5679 5681" 5697 5702 5707 5709# 5725 5730 5735 5737#@ 85755 5760 
5765 57678 5781 5786 5791 5793#@ 5816 5821 5826 58288 5842 5847 5852 
58548 5873 5878 5883 58858 5899 5904 5909 59118 5929 5934 5939 59418 
5954 5959 5964 59668 5981 5985 5990 59928 6008 6012 6017 60198 6034 
6038 6043 60454 6059 6063 6068 60708 6085 6089 6094 60968 6111 6115 
6120 61224 6137 6141 6146 61488 6163 6167 6172 61748 6189 6193 6198 
62004 6215 6219 6224 62268 6240 6244 6249 62518 6266 6270 6275 62778 
6292 6296 6301 6303# 6318 6322 6327 63298 6344 6348 6353 6355#@ 6369 
6373 6378 63808 6395 6399 6404 64064 6421 6425 6430 64328 6447 6451 
6456 64584 6473 6477 6482 6484" 6499 6503 6508 6510# 6525 6529 6534 
6536# 6551 6555 6560 6562# 6577 6581 6586 6588" 6604 6609 6614 66168 
6633 6638 6645 66458 6665 6670 6675 66774 6697 6702 6707 67098 6724 
6729 6734 6736# 6751 6756 6761 67634 6778 6783 6788 67908 6805 6810 
6815 68174 6832 6837 6842 68448 6859 6864 6869 68718 6885 6890 6895 
6897# 6912 6917 6922 69248 6939 6944 6949 69514 6966 6971 6976 69788 
6993 6998 7003 7005# 7020 7025 7030 7032 7047 7052 7057 7059#@ 7074 
7079 7084 70864 7101 7106 7111 7113#@ = =7128 7133 7138 7140# 7155 7160 
7165 71674 = =7182 7187 7192 7194# 7209 7214 7219 72218 7236 7241 7246 
72488 7263 7267 7272 72748 7289 7293 7298 73008 7315 7319 7324 73268 
7341 7345 7350 73528 867367 7371 7376 73788 8 7393 7398 7403 74058 7415 
7420 7425 74278 = =—7441 7446 7451 7453# 7462 7467 7472 7474# 7489 7494 
7499 7501# 7515 7520 7525 75278 = 7541 7546 7551 7553#@ 7562 7567 7572 
7574# 7590 7594 7599 7601# 7617 7621 7626 76284 7641 7645 650 76528 
7665 7669 7674 7676# 7690 7694 7699 7701# 7714 7718 7723 7725@ 87739 
7743 7748 7750# 7758 7762 7767 7769# 7778 7782 7787 7789# 867798 7803 
7808 7810# 7819 7824 7829 7831# 7849 7853 7858 78604 7878 7882 7887 
78894" 7907 7911 7916 7918# 7936 7940 7945 79478 = 7965 7969 7974 79768 
7994 7998 8003 8005# 8023 8027 032 80348 8052 8056 8061 80634 8075 
8078 083 8085# 8095 8100 8105 8107# 8117 8122 8127 81298 8139 8144 
8149 81514 8166 8170 8175 8177# 8193 8197 202 82048 8220 8224 8229 
82318 8247 8251 8256 82584 8275 8280 285 82878 8304 8309 8314 83168 
8337 8342 8347 83498 8366 8371 8376 83784 8394 8398 8403 8405# 8421 
8425 8430 84328 8448 8452 8457 84598 8475 8479 484 84868 8502 8506 
8511 85134 8530 8535 8540 85428 8559 8564 8569 85718 3587 8592 8597 
85998 8615 8619 8624 86268 8642 8646 8651 86538 8669 8675 8678 86808 
8698 8703 8708 8710# 8729 8734 8739 87418 8756 8760 8765 8767# 8782 
8786 8791 8793# 8808 8812 8817 88198 8854 8838 8843 88458 8854 8859 
8864 88664 8875 8880 8885 8887# 8906 8912 8917 89198 8938 8944 8949 
89518 8970 8976 8981 8983# 9002 9008 9013 9015# 9039 9045 9050 90528 
9076 9082 9087 90898 113 9119 9124 9126# 9150 9156 9161 91638 9187 
9193 9198 9200# 9224 9230 9235 92378 9265 9271 9276 92788 9302 9308 
9313 9315#@ 9334 9340 9345 9347# 9366 9372 9377 93798 9398 9404 9409 
94114 9430 9436 9441 94438 9452 9457 9462 94648 9473 9478 9483 94858 
9494 9499 9504 95068 9515 9520 9525 95278 9536 9542 954? 95498 9558 
9565 9568 9570# 9586 9590 9595 9597# 9614 9618 9623 96258 634 96 38 
9643 9645# 9653 9657 9662 96648 9677 9681 9686 90888 9701 9705 9710 
| 
| 


ee eee eee) 


SEQ 0345 | 


13:53 PAGE 347 


111 
11-SEP-79 


CROSS REFERENCE TABLE -- USER SYMBOLS 
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CQKDA-D KD11-K BAS 


& aR 7 Be Be & a me 7 = 8 ee eS Be ee 
LMS OR MMMM ON TR RNA ]@ FMR UR DMR OR BH MK TIRE NNAEMOR KK MONE MM — OM SO 
Om FUOOH DORA KHSEM IU OMS OUNG FOR DOR MM FITMNMDROMNOMIFNAOMAOOMAHIVOO 
OS BR SS LOB Bese ee S RANA SSN AAMARAA ET SoS SSS EROS 
oon oooo°oo OOO & &— &— HB HE EE FE EK NNNNNNNNMMOMMMMM TTS 
-— — —— oe EE EE EE EE EE EE EE EF EE EE EE EEE 
= 3 & Sa 22 7 22 8 = = 8 
RMAAKRKAADO—MMF OC OMUMONAUM TA OCOMVUDAAS OFVNDOM FT —OMIMAGITMOO SOM OF 
OS MRR eS SHS SSNS ORO NEN OR OSNMASA DROS IR 
~ SO o£ EBS Bee eee SS RANN A Sree oS ee EOL 
oo SODKDODOOO ES © FE NNNNNNU NMI IID STOTT 
— — —— ee ee EE EE EEE EEE EE EE EE EE EE EE EE 
od & 7 me 2 7 c 3 RB cd —o 7 
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7 7 = Te aS = cog Re a <a Be a 
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SPAAAOCCOOCCOCOCOCOC S— © BH BF ENN NNNNMMMMMMMOM TTT 
— = ee EE EE EE EE EE EE EE EE 
Be = 3 ka = = 3 a Re . 3 7 cas 
SOK UMOO OF FONN FOMNMOD FF RORK— NM ONK— KR OMM ORK ROD MRR TOM TK ONT ON 
DNANAOK OWN FFM e- O-— OR. DOR MD FANN K— ORK NK ONNRG FARK NAN TOUMMOUM— TOY 
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TMOM OK FVUMVUOS AF DODMMOLMANK— HK VUMIM FO ODA OTS OMNMNUODO—MVUNAOCO—-—-eOso 
DAOC K— UM TNO OF DOAO— WNOIMM FNM OF DROOC— UMN ODOK— MIN DO—VTN OFF O- 
POOAOCOCCCCCOC CCC NINN NNN NM NM NMP TTT SITTIN 
EEE EEL EEE LE ELL 
a eS 7 on’ mm = as tS a ee a 4 = 
MNAOMK—MK— NK KA MOMOAM— OOM— MMO FOO ODO F¥ KA TADUMMNO-—MAGSMOM OO ODO 
MVOR AMM HK — OD DR HUG OVEN K—KNUNNANL AS OMAUNTIND OOF— VNDADAOCOOAr 
~DOAOO— UM TNO OP-DOROK— K— UMM TNMN OP. DOERCO— UMN ODO— NTN ODKOVUMNMEF DOOM 
POOP OCCCDCDCOCC COCO — NINN NMED PNP ST TT TTT 
SO EE EE EL CLEC EL LLL LE L_OMCOMLLMLL OC 
= eS er 2 ha SS = = . sf te ee az & 3 
HK TFRNOQOE NE OIM OM HO TOD P- RK NDA NK TFOMOWM TFUAOALKLP—-— DMV O— TF KM OMO@ OF N 
MN— PD OMMMAI— OD Or OF F—DO-— DTOOVNO— —- AMHR DODHOOV— sONODOVOLAOTF OOK VE 
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CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0346 





SIPFLG 001057 907" 16134 16196 | 
$1PS_ 001050 902" 16183 16196 | 
STRAP 063166 4405 4622163418 | 
$STRAP2 063210 163528 16368 
RP = 000005 16356# 163658 16366" 163678 163688 | 
STRPAD 063222 16346 163630 
$TSTM 000704 857M 
STSTNM 001002 8B0# 15921 15935* 15977" 15978 15983 15985 15991 16026 16057 
STYPBN= *eeeee YJ 16368 
STYPDS= tereee YJ 16368 
$TYPE. 062210 16134" 16306 16356-16364 
STYPEC 062422 16164 16171 16178 161834 16184 
STYPEX 062670 16189 16191 161948 
$TYPOC 062516 162278 16365 | 
$TYPON 062532 16226 162298 16367 
STYPOS 062472 162224 16366 
SUNIT. 001132 9378 
SUNITR 000710 8598 
SUSUR 001144 9448 
SXTSTR 061350 159464 
$$6E14= 000000 157084 
SOFILL 062715 16223e 16227" 16237 162728 
S4OCAT= teeeee Y 15943 16033 
- = 070034 8290 B33" 38H B44 si OBAT#—BG9H BOS SOG BOBHSB70H «= B77H# (926 
2295 2736 ©2956. 368K. 197 «4922-5795 66477503 «8318. -9239-—«10024 10894 
11706 12408 12616-12647 -12678--:12709-«12740-«-12760««'12775-—«12807,-«:13900«14851 14923 
15716 15717# 15738 15765 15990 15991 16057-16107" 16196 163278 163918 16575 16576 
16598 171174 
\SASTAS senses U 16279 16282 
"sx = 000700 Buus B49 
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CQOKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0347 
COMMEN la 8278 
ENDCOM iL 8278 


ENDERR 159978 16053 
ENDPAS 156804 15699 
ENDSCO 159154 15985 
ERROR ly 4425 4654 4668 4688 4704 


9611 9616 9636 9655 9674 9679 9698 9703 9724 9746 9751 9772 9778 9799 9805 
9826 9832 9854 9876 9898 9920 9942 9964 9986 10008 10013 0039 10044 10066 10071 
10093 10098 10120 10126 10148 10153 10175 10180 10202 10207 10228 10233 10256 10262 10285 
10291 10314 10320 10343 10349 10372 10378 10401 10407 10429 10435 10458 10464 10486 10492 
10514 10519 10541 10546 10569 10574 10596 10601 10623 10628 10650 10655 10676 10681 10703 
10708 10730 10735 10758 10764 10787 10793 10817 10823 10847 10853 10877 10883 10911 10917 
10941 10947 10971 10977 11000 11006 11025 11046 11068 11090 11112 11134 11156 11178 §=11199 
11221 11262) 11264) 111278 )3=—-111286)=— 11300) 11308 )=—. 11322) 11330) 11335) 11349) 11357) 11371) 1137911384 
11387) 11403) 11417) 11415) 11429) 11433) 11441) 11446 11460) 11468) = 11482) 11490) 11495) 11498 )—-11512 
11520 11526 11538 11546 11549 11564 11572 11575 11590 11593 11601 11606 11620 11625 11631 
11636 «=. 11653.- 11663-11683) 11688 )=— 11693) 11716) 11723) 11741) 11747) 11766 11776) = 11795)S 11805 =: 11809 
11828 §=6.11831 =: 11841): 111860)=— «11870-11874 =: 11893-11903): 11921 Ss: 11932) 11936) )3=-11950)) 111979): 111981 = 12000 
12019 12038 12057 12076 12084 12089 12096 12119 12126 12133 12156 12163 12170 12191 12199 
12212 12220 12230 12251 12259 12272 12280 12290 12313 12334 12352 12377 124608 12436 12444 
12669 12677 12512 12519 12528 12531 12569 12576 12585 12588 12619 12650 12681 12712 12743 
12779 12811 §=12853 «12857. 12912): 12919-12926) 12932) 12937) = 12965-12990) 112998 )3=—s: 13005 «13029 =: 113037 
13044 13068 13093 13118 13147 13162 13170 13178 13201 13209 13216 13239 13247 13255 = 13272 
13294 133046 13314 13324 13354 13364 13374 13384 13412 13422 13444 13453 13476 13485 15508 
13531 13554 13576 13583 13611 13621 13646 13656 13681 13691 13714 13740 13767 13795 13824 
13871 13889 13913 13930 13947 13967 14022 14082 14142 14202 14243 14287 14319 14326 14350 
16357 14381 = 14388 «= 14393) 14417) 14424 = 14429 14453144660 = 14465 14489) 14496) 14501) 14525 14532 
14556 14578 14585 14607 14614 14636 14643 14665 14711 14731 14735 14756 14760 14780 814784 
14806 146812 14835 14841 146867 14873 14907 14911 14924 14968 15015 15054 15097 15106 1512? 
19166 15176 15179 15198 15241 15270 15297 15308 15340 15347 15355 15369 15377 15385 15407 
sobs 15426 15661 15477 15486 15497 15508 15523 15531 15545 15593 15604 15627 15657 15672 


15933 
ESCAPE la 8274 
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CQKDA-D KD11-K BASIC LOGIC TESTS MACY11 350A(1052) 11-SEP-79 13:53 PAGE 351 

COKDAD.P11 11-SEP-79 15:31 CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0348 

GETPRI la 8278 

GE TSWR la 8278 

MSG 45628 4564 128198 12821 128634 12865 135898 13591 13846 13848 13969# 13971 14029# 14031 140898 
14091 14149H 14151 914209 14211 14254 14256 146678 14669 151448 15147 15205# 15208 15275# 15278 
15312@ 15315 15389# 15392 15428 15431 15550# 15553 

MSGJ 148884 14890 

MSGM1 86149254 14928 

MSGMIO 15022 15025 

MSGM11 150574 15060 

MSGM3 = 614977# 14979 

MULT la” 8278 

NEWTST la 8278 1936 1963 1975 1989 2004 2018 2035 205! 2068 2090 2130 


8646 8673 8703 734 8760 6 8812 8838 859 8880 8912 8944 8976 9008 9045 
9082 9119 9156 9193 9230 9271 9308 9340 9372 9404 9436 9457 9478 9499 9520 
9542 9563 9590 9618 9638 9657 9681 9705 9726 9753 9780 9807 34 9856 9878 
9900 9922 944 9966 9988 10015 10046 10073 10100 10128 10155 10182 10209 10235 10264 
10293 10322 10351 10380 10608 10437 10466 10494 10521 10548 10576 10603 10630 10656 0683 
10710 10737 10766 10795 10825 10855 10885 10919 10949 10979 11008 11027 11048 11070 11092 
11114-11136) 11158 = 111780) 11207) 11223) 11244) 11266) 11288 )=—11310)) 11337) 11359) 11391) 11417-11448 
11470 11500 11526 11552 11578 11608 11638 11666 11697 11726 «11751 11780 11812 11845 11878 
11906 11940 11956 11983 12002 12021 12040 12059 12100 12137 12174 12234 12294 12318 12336 
12354 12384 124616 12449 12682 12539 12596 12627 12658 12689 12720 12751 12787 12819 12863 
12950 12970 13010 13048 13073 13098 13123 13147 13186 13224 13276 13336 13396 13426 813458 
13490 13513 13536 13558 13589 13626 13661 13696 13722 13749 13776 13806 13846 13876 =. 113891 
13916 §=613932, 13949» 13969) 14029 14089) 14149 14209) 14254 = 14298 = 14328 = 14359) = 14395 1443114467 
14503 14534 14558 14587 14616 14645 14667 14713 14737 14762 14786 14814 14843 14888 14926 
14977 15023 15058 15145 15206 15276 15313 15390 15429 15551 15638 
NOINST 12634 11959 120463 13699 13725 13752 13779 13809 14001 14061 14121 14181 14227 14271 14301 
14331 14362 «14398 = 114434 14470) 14506) = 14527 = 14561 = 14590 = 14619) 14648 = 14789 14817 = 14846 
NOSCOP 12634 1939 1952 1966 1978 1992 2007 2021 2038 2054 2071 2093 2115 2133 2151 

2170 2189 2206 2229 2252 2269 2291 2317 2347 2366 2384 2400 2418 2437 2458 
2478 2499 2520 2542 2566 2589 2612 2633 2649 2668 2686 2709 2726 274) 2759 
2776 2801 2826 2845 2869 2892 2908 2926 2952 2980 2998 3016 3034 3051 3075 
3091 3109 3128 3160 3197 3234 3271 3308 3333 3358 3383 3409 3435 3461 3487 
3513 3535 3558 3594 3630 3648 3666 3684 3707 3723 3751 3765 3779 3793 3808 
3825 3838 3852 3867 3882 3897 3912 3927 3942 3956 3971 3986 4001 4016 4030 
4045 4060 4075 4101 4119 4136 4172 4193 4217 4248 4270 4310 433) 4371 439% 
4416 4435 4459 4480 4508 4529 4547 4573 13852 
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POP a 827# 15750 15751 16321 16322 
PREERR 159968 


16 
PRENEW 12634 14895 14938 14989 15033 15075 15153 15216 15283 15324 15400 15441 15566 
PRESCO 15914 15 
PUSH le 8274 15728 15734 16282 16284 16305 
REPORT iL 8278 
SCOPE eat 4319 4646 4660 4674 4694 4716 


SEQ 0349 


8 88635 884 8916 8948 8980 9012 9049 9086 9123 9160 9197 9234 
9344 9376 9408 9440 9461 9482 9503 9524 9546 9567 9594 9622 9642 
9709 9730 9757 9784 9811 9838 9860 9882 9904 9926 9948 9970 9992 
10077, 10104 =: 10132): 10159): 10186 )3=s:110213)S 10239 Ss 110268 )3=—s:*110297)-:10326)3=—s:«:10355 =: 10384 =: 10412 
10498 10525 10552 10580 10607 10634 10660 10687 10714 10741 10770 10799 10829 
10923. 10953-10983) 11012) 11031) )=—-11052) 11074) 0s: 111096) 11118) = 11160) 11162011184): 11205 
11270) «6.11292, 11316011341) 11363) 11395) 11421) 11452) 11474) = 11504 =. 11530-11556) =: 111582 
11670 =. 11701) Ss-11730) 11755) 11784-11817): 11849-11882) 11910-11944 )=—-11960)=s-«111987 = 12006 
12063 «12106 «= 12141) 12178 )=— 12238 )=— 12298 )=— 12322) 12340) = 12358 = 12388 = 12420) )=— 12453 = 12486 
12631 12662 12693 12724 12755 12791 12826 12871 12954 12974 13014 13052 13077 
13151 13190 §=6.13228)3=—- 13280) 13340) )=— 113400) 3=—s 113430) 13462) 13494) = 135517) = 13540) =: 113562) =: 113595 
13700 13726 §«6©13753 =13780 «(13810 13837 13880 13895 13920 13936 13953 14002 14062 
14228 14272 814302 §=14332 14363) 14399) 14435 14471) 014507) = 14538 = 14562 = 14591 = 14620 
14717 14741 14766) 14790) 14818 = 14847) Ss 14897) 14940) 91499115035 15077 = 15155): 15218 
15402 15443 15568 156435 15689 

SETPRI is 8278 

SETTRA 163564 16365 16366 16367 

SETUP la 8278 

SKIP 1” 8274 1943 1958 1970 84 1999 2012 2031 2047 2063 2085 2107 
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CQKDA-D KD11-K BASIC $eets. Te 

CQKDAD.P11 11-SEP-79 13:31 CROSS REFERENCE TABLE -=- MACRO NAMES SEQ 0352 
12975 =©13015 §=.13053) «13078 )=—s:13103))S 13128 =: 13152) ss-13191)0Ss 13229) ss« 13281) 0s «133410134010 -13431 0: 13463 =: 113495 
13518 13541 13563 13596 13631 13666 13701 13727 13754 13781 13811 13853 13881 13896 13921 
13937 = 13954 14003 14063 14123 14183 14229 14273 14303 14333 14364 14400 14436 14472 14508 
14539 = 14563 —ss-«14592 14621 146650 14676 14718 14742 14767 14791 14819 14848 14896 14939 4 
15034 15076 15154 15217 15284 15325 15401 15442 15567 15642 

TRATRP 163568 

TYPBIN la 8274 

TYPDEC la 8278 

TYPNAM Wa 8274 

TYPNUM iT 8278 

TYPOCS i] 8274 

TYPOCT la 82784 16075 16099 

TYPTXT la 8278 


UPCODE 15722# 15747 


YESCOP 12634 4645 4659 4673 4693 4715 4735 4757 4771 4786 4801 4816 4831 4845 4860 
4875 4890 4916 4937 4963 4980 5032 5049 5075 5093 5119 5145 5197 5224 5250 
5276 5302 5329 5356 5383 5410 5436 5462 5488 5514 5540 5566 5593 5621 5649 
5677 5705 5733 5763 5789 5824 5850 5881 5907 5937 5962 5988 6015 6041 6066 
6092 6118 6144 6170 6196 6222 6247 6273 6299 6325 6351 6376 6402 6428 6454 
6480 6506 6532 6558 6584 6612 6641 6673 6705 6732 6759 6786 6813 6840 6867 
6895 6920 6947 6974 7001 7028 7055 7082 7109 7136 7163 7190 7217 7244 7270 
7296 7322 7348 7374 7401 7423 7449 7470 7497 7523 7549 7570 7597 7624 7648 
7672 7697 7721 7746 7765 7785 7806 7827 7856 7885 7914 7943 7972 8001 8030 
8059 8081 8103 8125 8147 8173 8200 8227 8254 8283 8312 8345 8374 8401 8428 
8455 482 509 538 8567 8595 8622 8649 8676 8706 8737 8763 8789 8815 8841 
8 8883 8915 8947 8979 9011 9048 9085 9122 9159 9196 9233 9274 9311 9343 
9375 9407 9439 9460 9481 9502 9525 9545 5 9593 9621 9641 9684 9708 
9729 9756 9783 9810 9837 9859 9881 9903 9925 9947 9969 9991 10018 10049 10076 
10103 «10131 = 10158 )»=6 10185-10212) =: 10238 )§=6 10267) = 110296): 10325 10354 = 10383) 10411 0440 10469 10497 
10524 10551 10579 10606 10633 10659 10686 10713 10740 10769 10798 1082 10858 10888 10922 
10952. 10982. 11011) Ss 11030-11051) 11073) 11095) 11917) «11139-19161 -11983) 11206) = 11226) 11247): 11269 
11291 «11313 «-11340)=— 11362) 11396) 11420) 11451) 114673) 11503) 11529) 11555) 11581) 11617) 1164111669 
11700 11729 «611754 «611783 = 11816) 11848 =: 111881 Ss: 11909) 11943-11986 )= 12005-12024 «= 12062 = 121035 )=—- 12140 
12177, 12237, -12297)—S 12321) 0S 12339-12357) =: 12387) = 12419 Ss 12452-12485) 12542) :12599 )=— 12630): 12661 = 112692 
12723. 12756 «=6©12790)3=—-: 12825-12870) 0s 12953): 12973) 13013) 13051) = 13076 )=— 13101) 13126) = 13150) 13189): 13227 
13279 «13339 13399-13429) 13461-13493) -13516) 13539) =: 13561 = 13594 =:13629 Ss - 13664 =s:*13879) = 13894) =: 13919 
13935 = 1395214674 = 14716) 14740) = 14765 
SSCMRE 8718 910 911 912 913 914 915 
SSCMTM 8714 916 917 918 919 920 
SSESCA la 8278 
SSNEWT 1a 8274 1936 1949 1963 1975 1989 2004 2018 2035 2051 2068 2090 2112 2130 
2148 2167 2186 2203 2226 2249 2266 2288 2314 2344 2363 2581 2397 2415 2434 
2455 2475 2496 2517 2539 2563 2586 2609 2630 2646 2665 2683 2706 2723 2738 
2756 2773 2798 2823 2842 2866 2889 2905 2923 2949 2977 2995 3013 3031 3048 
3072 3088 3106 3125 3157 3194 3231 3268 3305 3330 3355 3380 3406 3432 3458 
3484 3510 3532 3555 3591 3627 3645 3663 3681 3704 3720 3748 3762 3776 3790 
3805 3820 3835 3849 3864 3879 3894 3909 3924 3939 3953 3968 3985 3998 4013 
4027 4042 4057 4072 4098 4116 4133 4169 419 4214 4245 4267 4307 4328 4368 
4391 4413 4432 4456 4477 4505 4526 4544 4562 4642 4656 4670 4690 4712 4732 
4754 4768 4783 4798 4813 4828 4842 4857 4872 4887 4913 4934 4960 4977 5029 
5046 5072 5090 5116 5142 5194 5221 5247 5273 5299 5326 5355 5380 5407 5433 
5459 5485 5511 5537 5563 5590 618 5646 5674 5702 5730 5760 5786 5821 5847 
5878 5904 5934 5959 5985 6012 6038 6963 6089 6115 6141 6167 6193 6219 6244 
6270 6296 6322 6348 6373 6399 6425 6451 6477 6503 6529 6555 6581 6609 6638 
6670 6702 6729 6756 6783 6810 6837 6864 6890 6917 6944 6971 6998 7025 7052 
7079 7106 7133 7160 7187 7214 7241 7267 7293 7319 7345 737) 7398 7420 7446 


—- oo 


2660 2678 


01 
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CQKDAD.P11 =: 11=SEP=79 13:31 CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0353 
7467 749 7520 7546 7567 7594 7621 7645 7669 7694 7718 7743 7762 7782 7803 
7824 7853 7882 7911 7940 7969 7998 8027 8056 8078 8100 8122 8144 8170 8197 
8224 8251 8280 8309 8342 8371 8398 8425 8452 8479 8506 8535 8564 8592 8619 
8646 8673 8703 8734 8760 8786 8812 8838 8859 8880 8912 8944 8976 9008 9045 
9082 9119 9156 9193 9230 9271 9308 9340 9372 9404 9436 9457 9478 9499 9520 
9542 9563 9590 9618 9638 9657 9681 9705 9726 9753 9780 9807 9834 9856 9878 
9900 9922 9944 9966 9988 10015 10046 10073 10100 10128 10155 10182 10209 10235 10264 
10293 10322 10351 10380 104608 10437 10466 10494 10521 10548 10576 10603 10630 10656 10683 
10710 10737 10766 10795 10825 10855 10885 10919 10949 10979 11008 11027 11068 #11070 11092 
11114-11136) 11958 = 179180) 11201-11223) 11246) 11266) 111288 = 11310) 11337-11359) 11391-19417 11448 
11470 11500 11526 11552 11578 11608 11638 11666 11697 11726 11751 11780 11813 11845 11878 
11906 11940 11956 11983 12002 12021 12060 12059 12100 12137 12174 12234 12294 12318 12336 
12354 12384 12616 12449 124682 12539 12596 12627 12658 12689 12720 12751 12787 12819 12863 
12950 12970 13010 13048 13073 13098 13123 13147 13186 13226 13276 13336 13396 13426 13458 
13490 13513 13536 13558 13589 13626 13661 1369 13722 ©13749 13776 13806 13846 13876 8613891 
13916 13932 139 13969 14029 14089 14149 1420 14254 14298 14328 14359 14395 14431 14467 
14503 1465340145 14587 14616 146465 14667 14713 16737 14762 146786 14814 146843 14888 14926 
14977. 15023 +=150 15145 15206 15276 15313 1539 15429 =: 15551 15638 
S$SET 16356# 16365 16 16367 
SSSKIP la 274 8619 1958 1971 1984 1999 2031 2047 2063 2085 2107 2125 2143 
2181 21 2221 2261 2283 2358 2376 
25 2534 2580 2603 2701 
28 2918 2944 3026 
3 3326 3351 3453 
36 3757 3815 
3 3978 4037 
4472 
4838 


NAAM SWAPO OU ES FWP me | OO 


8938 8970 9002 9039 9076 9113 9150 9187 9224 9265 9302 9334 9366 9398 9430 
9452 9473 9494 9515 9536 9558 9586 9614 9634 9653 9677 9701 9721 9749 9775 
9802 9829 9851 9873 9895 9917 9939 9961 9983 10011 10042 10069 10096 10123 10151 
10178 10205 10231 10259 10288 10317 10346 10375 10404 10432 10461 10489 10517 10544 10572 
10599 10626 10653 10679 10706 10735 10761 10790 10820 10850 10880 10914 10944 10974 11003 
11023 11063) 11065) 11087) 11109) 11137) 1991853) 19975) 11196) 19218 1123911261) 11279) 1128411301 
11306) =-11323) 11333) «113500113550 11372) 113820011385) 11404) = 11609-11412) 114630 114634 11465 (11461 
114666 11483) 11493) 11496) 11513) 11518 = 81521) 11539) 1154411547) 11565) 11570) 115735) F1D91))—-11594 
115999 11602 11621 11624 11629 11632 11657 11770 11799 11835 «11864 «11897 11926 11951 11977 
11980 11998 12017 12036 12055 12092 12129 12166 12193 12201 12213 12222 12253 12261 = 12273 
12282 12331 «12349 «=13181 »=13219 13258 «=: 13327) = 13387?) = 13612) 13647) = 13682 14245) 14289) 14324 14355 
14391 14427 14463 14499 14530 14554 14583 14612 14641 14663 14706 14734 14759 146783 14811 
14840 14872 

EQUAT la 695# 717 

- HEADE la 695a 696 

KT11 la 

SETUP 1 


: 2 
» SWRHI ls 695" 705 


e 1 
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CQKDAD.P11 11-SEP-79 15:31 CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0354 
. SWPRLO 7168 

-SACTI ls 6954 861 
-SAPTB ls 695# 9278 
SAPTH ls 95a 

-SAPTY \a 6954 16275 
SASTA la 

-SCATC la 6958 827 
SCATA la 6954 87) 
- $0820 ia 

- $0820 \a 

-$D1V a 

. SEOP ia 6954 15681 
SERRO la 6954 15998 
-SERRT la 6954 16061 
» SULT la 

. SPOWE la 695# 15722 
- SRAND ia 

. SRODE is 

- $ROOC \a 

. SREAD la 

~SR2AZ la 

- SSAVE la 

-$SB2D oe 

- $8820 la 

-$SCOP la 695# 15916 
$SIZE ls 

SSUPR ia 

- STRAP la 6954 16333 
STYPB la 

-STYPD la 6954 

STYPE la 695# 16117 
$TYPO la 6954 16197 
-$40CA la 

.1170 la 


- ABS. 070034 000 


ERRORS DETECTED: 0 


DSKZ:CQKDAD.BIN, CQKDAD.LST/CRF/SOL/NL : TOC=CQKDAD.SML ,CQKDAD.P11 
RUN-TIME: 179 227 18 SECONDS 

RUN-TIME RATIO: 762/425=1.7 

CORE USED: 39K (77 PAGES) 


